СРОЧНО!
помогите исправить ошибки в программе
program n12;
var
x:y;real:
begin
write;('Введите x и y');
readln(x и y);
if x<2 then y=x
else 2<=x<=3
if 2<=x<=3 then y=2
else y=-x+5
end.