Question

Написать программу вычислений конуса по формуле V = ⅓πR²H

Answer 1

• Program Brainly;
• Var h, r, V:real;
• begin
• WriteLn ('Введите высоту конуса: ');
• Readln (h);
• WriteLn ('Введите радиус конуса: ');
• Readln (r);
• V:= 1/3*pi*(r*r)*h;
• WriteLn ('Обьём конуса равен: ',V:5:1);
• end.