Дан радиус окружности(любой, заданный пользователем) Найти длину и площадь круга. Выполнить в паскале.

AMAYA000 AMAYA000    3   11.06.2020 03:20    1

Ответы
mihailsokolenk mihailsokolenk  15.10.2020 13:42

program Hello;

var r : integer;

begin

   write('Введите радиус круга: ');

   readln(r);

   writeln('Длина круга = ', 2 * 3.1415 * r:0:2);

   writeln('Площадь круга = ', r * r * 3.1415:0:2)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика