Паскаль. С клавиатуры вводится естественное число X. Нужно получить число Y,

язык какой

Паскаль

числа могут быть с хоть каким кол-вом разрядов?

да

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

procedure Rvr(var n,nr:BigInteger);
begin
  if nlt;gt;0 then begin
    nr:=nr*10+ n mod 10;
    n:=n div 10;
    Rvr(n,nr)
    end
end;

begin
 
  var nr:=BigInteger(0);
  var n:=ReadlnString('Введите естественное число:').ToBigInteger;
  Rvr(n,nr);
  Writeln(nr)
end.

Пример
Введите естественное число: 234536406567867348292735385468776123478182736
637281874321677864583537292843768765604635432

Var X, Y: longint;

procedure revX(X: longint; var Y: longint);
begin
  if X lt;gt; 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.