Составить программу вычисления объема цилиндра и конуса, которые имеют одинаковую высоту H и одинаковый радиус основания R (написать в паскале)

Пусть V1 - объем цилиндра, а V2 - объем конуса, тогда:
$displaystyle V_1= pi R^2h V_2= frac{1}{3} pi R^2h= frac{1}{3}V_1$

const
pi=3.14;
var
V1,V2,R,h:real;
begin
Write(Введите радиус и высоту: ); Read(R,h);
V1:=pi*sqr(R)*h; V2:=V1/3;
Writeln(Объем цилиндра ,V1:0:5,, объем конуса ,V2:0:5)
end.

Тестовое решение:
Введите радиус и высоту: 5.5 12.81
Объем цилиндра 1216.75785, объем конуса 405.58595

Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Найти другие ответы