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

Текст программы:

program num;

var n: integer;

begin

  write(\'Enter n: \');

  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.

Вывод на экран:

Enter n: 445

The next number for the number 445 is 446.

The previous number for the number 445 is 444.