1,先将数字转成字符再处理, 完成后再转成数字输出, 这样好判断和处理
input "请输入一个三位整数:" to n
if between(n,100,999) and n=int(n)
c=alltrim(str(n))
c2='' &&转换后的字符串
for i=1 to len(c)
c2=substr(c,i,1)+c2 &&反向组装
endfor
n2=INT(val(c2))
?n,"转换后的结果是:",n2
else
?"输入的数不符合要求"
endif
2, 直接在数字上处理
input "请输入一个三位整数:" to n
if between(n,100,999) and n=int(n)
n1=(n/10-int(n/10))*10 &&提取个位数
n2=int((n/100-int(n/100))*10) &&提取百位数
n3=int(n/100)
x=INT(n1*100+n2*10+n3) &&重新组装
?n,"转换后的结果是:",x
else
?"输入的数不符合要求"
endif