Напишите программу на ШАЯ.Вычеслите объем шара заданного радиуса.(V=4/3nr^3) n-число пи на Паскале
Program gt; var r,v:real; begin readln(r); v:=(4/3)*pi*r*r*r; writeln(v); end.