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

Площадь окружности: S = пи*R^2Радиус окружности равен: R = квадратный корень из (S/пи), где S = площадь окружности, Пи постоянная величина = 3,14uses crt;const pi=3.14;var R,S: real; begin writeln(\'Vvedite S: \'); readln(S); R:=sqrt(S/pi); writeln(\'Radius = \',R);end.