Задача №1607 Число у зворотньому порядку

Записати ціле невід’ємне число n у зворотньому порядку.

Вхідні дані

Одне ціле невід’ємне 64-х розрядне число.

Вихідні дані

Запис числа у зворотньому порядку.

Розв’язок

var x:uint64;
begin
  read(x);
  if x < 10 then 
    write(x)
  else
    while x > 0 do
    begin
      write(x mod 10);
      x := x div 10;
    end;
end.