Задача: Дана площадь круга. Определить длину окружности.

Ученик не дописал решение задачи. Заполните пропуски так, чтобы программа решала поставленную задачу. Для необходимых вычислений в Паскале есть значение числа π обозначенное как pi.

Program test3;

Var R : real; // радиус

S : real; // площадь круга

S : real; // площадь круга

Begin

Readln ( );

:= (S / pi);

:= 2 pi
;

Writeln (‘Ответ: ’, );

End.

0 0 Пожаловаться