凑个热闹，【VFP实例：求100-999水仙花数的两种解法】

解法一：FOR循环嵌套+IF
* 找出100-999之间的所有水仙花数,即各个数位的立方和等于该数本身
CLEAR
FOR X=1 TO 9 STEP 1
FOR Y=0 TO 9 STEP 1
FOR Z=0 TO 9 STEP 1
IF (X^3+Y^3+Z^3)=X*100+Y*10+Z THEN
? X*100+Y*10+Z
ENDIF
ENDFOR
ENDFOR
ENDFOR
RETURN
解法二：FOR循环+IF
* 找出100-999之间的所有水仙花数,即各个数位的立方和等于该数本身
CLEAR
FOR x=100 TO 999 STEP 1
a=int(x/100)
b=int((x-a*100)/10)
c=x-a*100-b*10
IF x=(a^3+b^3+c^3) THEN
? x
ENDIF
ENDFOR
RETURN