В Pascal ABC. Найдите радиус окружности если известна площадь окружности.

0 голосов
149 просмотров

В Pascal ABC.
Найдите радиус окружности если известна площадь окружности.

Информатика (38 баллов) | 149 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
\displaystyle S= \pi R^2 \to R= \sqrt{ \frac{S}{\pi} }

var
  s:real;
begin
  Write('Площадь окружности: '); Read(s);
  Writeln('Радиус окружности равен ',sqrt(s/Pi):0:5)
end.

(150k баллов)
Похожие задачи