Представить цифры трехзначного числа в обратном порядке . например 645-> 546 в паскале.

Program _1;
var a:integer;
begin
readln(a);
writeln(a mod 10,(a mod 100)div 10,a div 100);
end.