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

Question

Информатика

Плакида

19 сентября, 08:44

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

+5

Ответы (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.