VFP编写程序,求五位数各位数字的平方和为100的最大的五位数.

******求五位数各位数字的平方和为100的最大的五位数.
CLEAR
FOR i=1 TO 9
FOR j=0 TO 9
FOR k=0 TO 9
FOR m=0 TO 9
FOR n=0 TO 9
IF i*i+j*j+k*k+m*m+n*n=100 THEN
aaa=i*10000+j*1000+k*100+m*10+n
ENDIF
ENDFOR
ENDFOR
ENDFOR
ENDFOR
ENDFOR
aaa