Моя интуиция подсказывает, что это паскаль, если так, тогда нужны скобки, иначе машина будет выдавать ошибку. Полный код будет выглядеть так:
var x:integer; y:real;beginreadln(x);if (x>=-2) and (x<=2) then y:=sqr(x)/4;writeln(y);end.