用Visual FoxPro程序把数字倒过来输出例如30103

答案：clear
s1="30103"
s2=""
for i=len(s1) to 1 step -1
  s2=s2+subs(s1,i,1)
next
? "输出：",s2

其他：若输入的数字按字符串处理，则程序为：
set talk off 
clear
accept "请输入字符串：" to s
n=len(s)
t=""
for i=n to 1 step -1
   m=substr(s,i,1)
   t=t+m
next
?"结果为：",t
 set talk on
 cancel



若输入的数字按整数处理，则程序为：
set talk off 
clear
m=""
input "请输入数字：" to t
do while t!=0
  s=t%10
  ??s
  t=int(t/10)
enddo
 set talk on
 cancel
个人意见，仅供参考！ 

上一个：visual foxpro 不能新建表单，报表，标签
下一个：在Visual Foxpro语言中，要求数据库文件某数值字段的整数是4位，小数是2位