var a,a1,a2,a3:integer;
begin
write('введите число: ');read(a);
a1:=a div 100;
a2:=a div 10 mod 10;
a3:=a mod 10;
writeln;
writeln('результат: ',a3,a2,a1);
end.