Составить алгоритм вычисления объёма конуса по формуле V=1/3 ПRквадрат*H

Question

Информатика

Емельяна

17 марта, 17:00

Составить алгоритм вычисления объёма конуса по формуле V=1/3 ПRквадрат*H

+2

Ответы (1)

Знаете ответ?

Корнила · Answer 1

Освежил память xD

Program algoritm;

var V, R, H:real;

n:=3.14;

begin

writeln ('Введите радиус основания конуса') ;

readln (R) ;

writeln ('Введите высоту конуса') ;

readln (H) ;

V:=R*R*H*n/3;

writeln ('Объем конуса равен', V) ;

end.