clear
"100-999之间的水仙花数有："
for i=100 to 999
k=int(i/100)
m=(int(i/10))%10
n=i%10
if k^3+m^3+n^3=i
alltrim(str(i))+space(2)
endif
endfor