Составить блок схему и программу определения переменной Y по одной из формул 

       x-1, если _ x ≤ -1
y=   x, если _ -1 < x ≤ 1
       x+1, если _ x > 1
Аргумент Х меняется в интервале от -5 до 5 с шагом 0,2. 
PS: где у=..., там скобка на три уравнения. Помогите, очень нужно!

тут указан шаг, я так понимаю надо протабулировать yvar i,x, y :real;beginx:=(-5);while (x<=5) do begin  if x<=-1 then y:=x-1 else  if x>1 then y:=x+1 else y:=x;  writeln('x= ',x:3:2, ' y= ',y:3:2);  x:=x+0.2;  end;end.