Паскаль пишет что в 7 строчке ошибка. Встречено '=', а ожидалось ';' var x,y:real;
в чем проблема? посмотрите вообще в целом программу на наличие ошибок
begin
write('x: ');
readln(x);
if (x>=-2.4)and(x<5.7)
then y:=x*x
else y=4
;writeln(y)
end.