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

Question

Информатика

Секлетинья

25 февраля, 07:35

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

+3

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