Вычислить объем шара и площадь поверхности шара с заданным радиусом

sobennikovaox sobennikovaox    2   01.10.2019 06:10    1

Ответы
Leprekon11 Leprekon11  09.10.2020 07:11

PascalABC.NET 3.4.2, сборка 1857 от 05.11.2018

Внимание! Если программа не работает, обновите версию!

program pascal;

var s, v, r:real;

begin

writeln('ВВедите радиус');

readln(r);

s:=4*3.14*r*r;

v:= 4/3*3.14*r*r;

Writeln('Площадь шара=',s,'Объем шара=',v);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика