Задача: Дана площадь круга. Определить длину окружности.
Ученик не дописал решение задачи. Заполните пропуски так, чтобы программа решала поставленную задачу. Для необходимых вычислений в Паскале есть значение числа π обозначенное как pi.
Program test3;
Var R : real; // радиус
S : real; // площадь круга
S : real; // площадь круга
Begin
Readln (...);
... := ... (S / pi);
... := 2... pi ...;
Writeln (‘ответ: ’, ...);
End.
Program test3;
Var R : real; // радиус
S : real; // площадь круга
L : real; // длина окружности
Begin
Readln (S);
R:= sqrt(S / pi);
L:= 2*pi*R;
Writeln ('ответ: ',L );
End.
Объяснение:
Program test3;
Var R: real; // радиус
S : real; // площадь круга
L : real; // дляна окружности
Begin
Readln (S);
R:=sqrt(S / pi)
L:=2*pi*R;
Wrinteln ('ответ: ',L);
End