Question

Состваить программу вычисления площади конуса.В паскаль.
s=(1/3)п*r^2*h 

Answer 1

uses crt;
var r,h:integer;
begin
write('Введите радиус и высоту конуса: ');
read(r,h);
writeln('S = ',pi/3*sqr(r)*h:0:2);
end.