Program ob; uses crt; const pi=3.14; var r,V:real; begin writeln('Ââåäèòå ðàäèóñ'); readln(r); V:=(4/3)*pi*sqr(r)*r; writeln('Îáúåì øàðà= ',V:0:1); writeln('Îáúåì øàðà ñ ðàäèóñîì 5= ',(4/3)*pi*sqr(5)*5:0:1); end.