Ответ:

var 

  b: integer;

 

begin

  writeln(‘Введите целое число’);

  readln(b);  //Вводим целое число

  if b > 0 then writeln(b + 1)  {Если число положительное, то печатаем это число + 1, иначе печатаем это число — 2}

  else writeln(b — 2);

end.

Отмтеть решение, как лучшее, плиз.