Паскаль. Создать программу которая высчитывает площадь круга; радиус вводится пользователем. Программа завершается когда r <0

Question

Настюра

7 сентября, 04:45

+5

Ответы (1)

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

Митрич · Answer 1

Кароч вот порога на нахождение радиуса

program z1;

var r:integer;

var s:real;

begin

read (r) ;

s:=3.14 * (sqr (r) ;

write (s) ;

end