Следующее и предыдущее

Напишите программу, которая считывает целое число от -30000 до 30000 и выводит текст, аналогичный приведенному в примере. Пробелы, знаки препинания, заглавные и строчные буквы важны!

Входные данные
Вводится целое число.

Выходные данные
Выведите ответ на задачу.

Исходный код на языке Pascal
var
  a: integer;

begin
  read(a);
  writeln('The next number for the number ', a, ' is ', a + 1);
  writeln('The previous number for the number ', a, ' is ', a - 1);
end.