Дано 3-х значное число,найти число,которое образуется перестановкой десятков и едениц. (программа Паскаль)

program al;var a,b,c,n:integer;beginwriteln('n=');readln(n);a:=n div 100;b:=n div 10 mod 10;c:=n mod 10;writeln('novoe=',a,c,b);              readln;              end.