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

Question

Информатика

Димитриан

30 марта, 22:04

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

+1

Ответы (1)

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

Сюша · Answer 1

Var r:integer;

begin

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

read (r) ;

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

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

end.