Разработать программу для расчёта площади поверхности и объёма шара известного радиуса.
Разработать программу для расчёта площади
поверхности и объёма шара известного радиуса.
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
var r:integer;
v,s:real;
begin
readln(r);
s:=4*pi*r*r;
writeln(s);
v:=4/3*pi*r*r*r;
writeln(v);
end.
Не нашли ответ?
Похожие вопросы