Volumen de un Cilindro

Program logicander;


Uses WinCrt;
Var
cilindro, volumen, radio, altura : real;
Begin


WriteLn ( 'Ingrese el Radio' );
ReadLn (radio);
WriteLn ( 'Ingrese la Altura' );
ReadLn (altura);


volumen:= 3.1416*(radio*radio)*altura;


WriteLn ( 'El volumen de El Cilindro es: ', volumen:3:3);


end.