ПОМОГИТЕ ПОЖАЛУЙСТА Задача: Дан периметр квадрата. Определить его площадь.
Ученик не дописал решение задачи. Заполните пропуски так, чтобы программа решала поставленную задачу.
Program
Var a : real; // сторона квадрата
S : real; // площадь квадрата
P : real; // периметр квадрата
Begin
Readln (_______);
________ := ___/ 4;
S := ________(a);
Writeln (‘Ответ: ’, ________);
End.