Дано условие: {x-3,если x> 7 y= {4*x в квадрате , если x< -5 {5, в других случаях напишите условие, используя оператор интегрированной среды программирования для решения . 50

Var x,y:real;
begin
write('Введите х: ');
readln(x);
if (x>7) then
y := x-3
else if (x<-5) then
y := (4 * x)(4 * x)
else 
y := 5;
writeln (y);
end.