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

Question

Информатика

Стюра

12 февраля, 17:43

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

+4

Ответы (1)

Знаете ответ?

Феодор · Answer 1

Var r:integer;

begin

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

read (r) ;

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

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

end.