Паскаль. Функция задана формулой f(x)= (два выражеия объединены знаком ' { ' ) -2х+11, при х<1     x^2-2, при х>=1 .  Cоствьте программу, которая запрашивает значения х и сообщает значение f(х). помогите пожалуйстааа((((

var x,y:integer;

begin

readln(x);

if x<1 then y:=-2*x+11

else y:=x*x-2;

writeln(y);

end.