Напишите программу, которая считывает целое число и выводит текст, аналогичный приведенному в примере - Free Pascal

Формулировка задачи:

Напишите программу, которая считывает целое число и выводит текст, аналогичный приведенному в примере. Пробелы, знаки препинания, заглавные и строчные буквы важны! Ввод: 179 Вывод: The next number for the number 179 is 180. The previous number for the number 179 is 178.

Решение задачи: «Напишите программу, которая считывает целое число и выводит текст, аналогичный приведенному в примере»

Листинг программы

var
  n: Integer;
begin
  ReadLn(n);
  WriteLn('The next number for the number ',n,' is ',n+1,'.');
  WriteLn('The previous number for the number ',n,' is ',n-1,'.');
end.

Объяснение кода листинга программы

Объявлена переменная n типа Integer.
Ввод с клавиатуры целого числа в переменную n с помощью функции ReadLn.
Вывод на экран сообщения 'The next number for the number ' с указанием значения переменной n.
Вывод на экран сообщения 'The previous number for the number ' с указанием значения переменной n.
Присвоение переменной n значения n+1.
Присвоение переменной n значения n-1.
Вывод на экран сообщения ' is ' с указанием значения переменной n.
Вывод на экран сообщения ' is ' с указанием значения переменной n.