y=
{5-x,если x<_ 3
{x+1,если х>3
Срочно

var y,x:integer;

begin

write('x: ');

readln(x);

if (x<=3) then

y:=5-x;

else

y:=x+1;

writeln('Y = ',y);

end.