计算一个正整数各个数位上数字的和。用VF编程

Answer 1

clear
input "请输入x的值：" to x
s=0
do while x>0
m=x%10
s=s+m
x=(x-m)/10
enddo
?"s=",s

追问

x=(x-m)/10
这步是什么意思？

追答

就是逐步减少，你用一个数代过去测试一下就知道了。

追问

这个程序是怎样想出来的哎？要是老师问我怎么想出来的我不知道怎么解释。