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

Question

Информатика

Иосиф

9 февраля, 18:36

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

+5

Ответы (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.