編寫pascal語言程序,輸入一個三位數的自然數,然後把這個數的百位數與個位數對調,輸出對調後的數.

題目：

編寫pascal語言程序,輸入一個三位數的自然數,然後把這個數的百位數與個位數對調,輸出對調後的數.

解答：

program j;
var
a,b,c,m,n:integer;
begin
readln(m);
a:=m div 100;
b:=(m div 10) mod 10;
c:=m mod 10;
n:=c*100+b*10+a;
writeln('n=',n);
readln
end.