Question

Напишите программу на ШАЯ.Вычеслите объем шара заданного радиуса.(V=4/3nr^3)
n-число пи
на Паскале

Answer 1

program gt;
var r,v:real;
begin
readln(r);
v:=(4/3)*pi*r*r*r;
writeln(v);
end.