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

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

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.

Microsoft Word