Дано трехзначное натуральное число а. получить новое натуральное число в, который являлся бы перевёртышём числа а (например, а=123, тогда в=321). с решением .

Var a: string;
    i, b: integer;
begin
     readln(b);
     a := inttostr(b);
     b := 0;
     for i := length(a) downto 1 do
         b := b * 10 + strtoint(a[i]);
     writeln(b);
end.

Я люблю строки =)