Составить программу вычисления объема и площади поверхности шара (pascal)

Question

Информатика

Авдокея

22 мая, 01:39

Составить программу вычисления объема и площади поверхности шара (pascal)

+2

Ответы (1)

Знаете ответ на вопрос?

Федяша · Answer 1

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.