Составить программу вычисления объема и площади поверхности шара(pascal)
Составить программу вычисления объема и площади поверхности шара(pascal)
Гость
Ответ(ы) на вопрос:
Гостьprogram z1;
var r,v,s,pi:double;
begin
pi:=3.14;
readln(r);
v:=(4/3)*pi*r*r*r;
s:=4*pi*r*r;
writeln('v=',v:10:5,' ','s=',s:10:5);
readln
end.
Не нашли ответ?
Похожие вопросы