Регистрация
Vitya619228
12.08.2022 23:21
Информатика
Есть ответ 👍

Составить программу на языке Паскаль.

216
359
Посмотреть ответы 1

Ответы на вопрос:

diyarbek2120313
diyarbek2120313
4,4(69 оценок)

program z;

var r:real;

begin

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

readln(r);

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

writeln ('Площадь круга равна: ', pi*sqr(r):0:3)

end.

Популярно: Информатика