编程实现输入一个3位整数,将它反向输出?
来源:百度知道 编辑:UC知道 时间:2024/05/04 18:54:18
做出来啊
pascal:
var
a,b,x1,x2,x3:integer;
begin
readln(a);
x1:=a div 100; {分离出这个整数的百位}
x2:=a div 10 mod 10; {分离出这个整数的十位}
x3:=a mod 10; {分离出这个整数的个位}
b:=x3*100+10*x2+x1;{算出a的反序数}
writeln(b);{输出a的反序数}
end.
N=INPUTBOX("","")
MSGBOX STRREVERSE(N)
'另存为a.vbs