Написать программу в паскале: Дано натуральное число n. Заменить порядок следования цифр числа n на обратный.

Чтобы заменить порядок следования цифр натурального числа n на обратный, нужно поочередно брать последнюю цифру числа и добавлять ее к новому числу.

Например, если n = 12345, то получится 54321.

Программа на Паскале:

pascal
program ReverseNumber;

var
  n, reversed, digit: longint;

begin
  writeln('Введите натуральное число n:');
  readln(n);

  reversed := 0;

  while n > 0 do
  begin
    digit := n mod 10;
    reversed := reversed * 10 + digit;
    n := n div 10;
  end;

  writeln('Число с обратным порядком цифр: ', reversed);
end.

Пояснение:

Операция n mod 10 позволяет получить последнюю цифру числа. Например, для числа 12345 результатом будет 5.

Операция n div 10 удаляет последнюю цифру числа. Например, из числа 12345 получится 1234.

Переменная reversed хранит новое число, в котором цифры записываются в обратном порядке.

Разберем пример:

n = 12345

Берем 5 → reversed = 5
Берем 4 → reversed = 54
Берем 3 → reversed = 543
Берем 2 → reversed = 5432
Берем 1 → reversed = 54321

В результате программа выведет:

Число с обратным порядком цифр: 54321

Если число оканчивается нулями, например 1200, то после переворота получится 21, потому что ведущие нули в числах не сохраняются.