Дана программа, в которой не хватает строки. Напишите пропущенную строку.

Program sqrtt;

var V, r, h: real;

begin

writeln ('введите высоту цилиндра') ;

readln (h) ;

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

readln (r) ;

V:=hpir*r;

writeln ('объем цилиндра равен ', v, ' см кв.') ;

end.

Question

Информатика

Савватий

26 апреля, 04:49

Дана программа, в которой не хватает строки. Напишите пропущенную строку.

Program sqrtt;

var V, r, h: real;

begin

writeln ('введите высоту цилиндра') ;

readln (h) ;

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

readln (r) ;

V:=hpir*r;

writeln ('объем цилиндра равен ', v, ' см кв.') ;

end.

+4

Ответы (1)

Знаете ответ на вопрос?

Вераха · Answer 1

Не хватает значения оператора Pi. Тоесть тебе нужно дописать в var само pi. Выглядеть будет так: var V, r, h, pi:real;

Дальше после строки readln (r) ;

Пишешь: pi:=3.14;

Как-то так. Ты присваиваешь значение числа pi.