Дистанционная подготовка: 2937
2937
от Дмитрий Черских - Воскресенье 28 Октябрь 2012, 23:43
  Напишите программу, которая считывает целое число и выводит текст, аналогичный приведенному в примере. Пробелы, знаки препинания, заглавные и строчные буквы важны!

Пример

Ввод Вывод
179
The next number for the number 179 is 180.
The previous number for the number 179 is 178.
Re: 2937
от Peter Cherepanov - Понедельник 29 Октябрь 2012, 01:01
  А в чем проблема?
Re: 2937
от Галина Cавченко - Вторник 16 Сентябрь 2014, 17:06
  program m1;
var
k: integer;
begin
write ('Введите целое число');
readln (k);
writeln ('The next number for the number ', k, ' is ', k+1, '.');
writeln ('The previous number for the number ', k, ' is ', k-1, '.');
end.