Question

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

Ученик не дописал решение задачи. Заполните пропуски так, чтобы программа решала поставленную задачу.
ПОМОГИТЕ ПОЖАЛУЙСТА РЕШИТЬ СРОЧНО
Program
Var a : real; // сторона квадрата
S : real; // площадь квадрата
P : real; // периметр квадрата
Begin
Readln (____);
____:= ____ / 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.

сделай ответ этот как лучший плиз