Question

Паскаль.
С клавиатуры вводится натуральное число X. Требуется получить число Y, в котором записаны цифры числа X в обратном порядке. Например, X=123 Y=321.
Примечание. Решите задачу с помощью рекурсивной процедуры.
50 БАЛЛЛЛОВВВВ

Answer 1

var X, Y: longint;

procedure revX(X: longint; var Y: longint);
begin
  if X <> 0 then
  begin
    Y := Y * 10 + (X mod 10);
    revX(X div 10, Y);
  end;
end;

begin
  write('Введите X = ');
  readln(X);
  revX(X, Y);
  writeln(Y);
end.

Answer 2

Боюсь на "любое количество разрядов" Ваш вариант не потянет))))