Question

Напишите программу на языке паскаль, которая запрашивает у пользователя число N, а затем выводит на экран 3 числа - N-1, N, N+1

Answer 1

var

 n:integer;

begin

 n:=ReadInteger('Введите число: ');

 write(n, ' - ', 1, ' = ', n - 1, #10);

 write(n, #10);

 write(n, ' + ', 1, ' = ', n + 1, #10)

end.