Question

Ввести натуральное число, поменять в нем все цифры на следующую, а цифру 9 на 0. PascalABC
ввод 193
вывод 204

Answer 1

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger;
  var St:=new Stack<integer>;
  while n>0 do begin
    St.Push((n+1) mod 10);
    n:=n div 10
    end;
  St.Println('')
end.

Примеры
193
204

1234567890
2345678901

Answer 2

Вряд ли в 5-9 классах проходят нечто похожее, но все равно круто

Answer 3

Проходят. Программы в разных школах разные. Нельзя всегда ориентироваться на худших.

Answer 4

Ок