写出100到999的水仙花数的和的vf 程序

写出100到999的水仙花数的和的vf 程序

所谓水仙花数是一个三位数，他的各位数字立方和等于该数字，比如153=1的立方+5的立方+3的立方

代码如下：
for i=100 to 999

n1=int(i/100) &&百位数
n2=int((i-n1*100)/10)&&十位数
n3=i-n1*100-n2*10&&个位数
if n1^3+n2^3+n3^3=i&&也可以写成:n1*n1*n1+n2*n2*n2+n3*n3*n3
?i
endif
endfor追答
追问：谢谢你，但是她问的是水仙花数的和，这个程序该怎样改一下求四个数的和，前提是不知道乃四个数是啥，只能用程序表示，，，，这样怎么写，我查了好多都没有，麻烦你了
追答：我的是显示各个数,要求和稍微改下就行了.
nsum=0
for i=100 to 999
n1=int(i/100) &&百位数
n2=int((i-n1*100)/10)&&十位数
n3=i-n1*100-n2*10&&个位数
if n1^3+n2^3+n3^3=i&&也可以写成:n1*n1*n1+n2*n2*n2+n3*n3*n3
nsum=nsum+i
endif
endfor
?'三位数中水仙花数之和为',nsum

你说的:
求四个数的和，前提是不知道乃四个数是啥，只能用程序表示

请说的具体点, 不太明白
追问：可以了，太感谢你了，学霸