: Дан периметр квадрата. Определить его площадь. Ученик не дописал решение задачи....

Question

: Дан периметр квадрата. Определить его площадь. Ученик не дописал решение задачи. Заполните пропуски так, чтобы программа решала поставленную задачу.Program test8;Var a : real; // сторона квадратаS : real; // площадь квадратаP : real; // периметр квадратаBeginReadln (); :=  / 4;S :=  (a);Writeln (‘Ответ: ’, );End.​

Answer 1

Ответ:

Program

Var a : real; // сторона квадрата

S : real; // площадь квадрата

P : real; // периметр квадрата

Begin

Readln (P);

a:= P / 4;

S :=sqr(a);

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

End.

Объяснение: