Реализовать программу, вычисляющею и выводящую объём шара по введённому радиусу - r.
Входные данные Выходные данные
2 ----> 33,49
3 ----> 113,03
1 ----> 4,18
Входные данные Выходные данные
2 ----> 33,49
3 ----> 113,03
1 ----> 4,18
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var
v, R: real;
begin
writeln('Введите радиус R=');
readln(R);
v:=(4/3)*pi*(R*R*R);
writeln(' Объем равен = ' ,v:0:2);
end.