Предмет: Информатика, автор: damokww

1)Составить программу для вычисления длины окружности и ее диаметра


13nisa13: По каким данным?
damokww: Все это только

Ответы

Автор ответа: 13nisa13
0

var r:real;

begin

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

read(r);

writeln ('Диаметр равен: ', r*2:0:3);

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

end.

Похожие вопросы
Предмет: Математика, автор: vikamay0905
Предмет: Литература, автор: linnikovkirillom