Для детской площадки выделили участок в форме полукруга, длина прямой стороны которого d. Определить, какой длины должно быть ограждение площадки и сколько квадратных метров искусственного покрытия необходимо.
Решить с помощью паскаля
заранее спасибо
Var d : Real;
Begin
Readln(d);
Writeln(Длина ограждения: ,d+3.14159265*(d/2));
Writeln(Площадь: ,3.14159265*sqr(d/2)/2);
end.
Оцени ответ
