Дан радиус окружности, найти длину окружности и площадь круга на языке программирования Pascal (паскаль)

Question

Информатика

Димитриан

25 сентября, 06:15

Дан радиус окружности, найти длину окружности и площадь круга на языке программирования Pascal (паскаль)

+3

Ответы (1)

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

Сюша · Answer 1

Var r:integer;

begin

writeln ('Введите радиус') ;

read (r) ;

writeln ('Длина окружности = ',2*pi*r) ;

writeln ('Площадь круга = ', pi*sqr (r)) ;

end.