Составить программу: 1.вычисления объема конуса(v=1/3pi r^2 h)

yanabutko1999 yanabutko1999    1   16.07.2019 11:10    19

Ответы
Элизабет3000000 Элизабет3000000  03.10.2020 05:37
//PascalABC
//NaaMan
var
    V, pi, h, r : real;
begin
    pi := 3.1415926;
    write('Укажите радиус основания конуса > ');
    readln(r);
    write('Введите высоту конуса > ');
    readln(h);
    V := 1 / 3 * pi * r * r * h;
    writeln('Объем конуса V = ', V);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика