Пожалуйста !!!!!!!!!!!!! Срочно !!!!!!!!!!!!!!!!1)Задача: Дана площадь круга. Определить...

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

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


Информатика (14 баллов) | 229 просмотров
Дано ответов: 2
0 голосов

Ответ:

Program test3;

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

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

L : real; // длина окружности

Begin

Readln (S);

R:= sqrt(S / pi);

L:= 2*pi*R;

Writeln ('Ответ: ',L );

End.

Объяснение:

(122 баллов)
0 голосов

Program test3;

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

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

L : real; // дляна окружности

Begin

Readln (S);

R:=sqrt(S / pi)

L:=2*pi*R;

Wrinteln ('Ответ: ',L);

End

(143 баллов)