一道vfp编程题 有关“完数”

来源：百度知道 编辑：UC知道 时间：2024/05/17 06:05:25
一个数如果恰好等于它的因子之和，这个数称为“完数”。例如 6 的因子有 1、2、3,而且 6 = 1 + 2 + 3，因此 6 是完数。
编写程序找出 1000 以内的所有完数，并按下面格式输出：
6 its factors are 1，2，3
LOCAL i,j,k,strTemp 是什么意思？我们没有学过
strTemp是什么意思？我们也没学过

LOCAL i,j,k,strTemp

for i=1 to 1000
k=0
strTemp=""
for j=1 to i-1
if i % j=0
k=k+j
strTemp = Strtemp + alltrim(str(j))+","
endif
endfor
if k=i
?str(i) +" its factors are :" +left(strTemp,len(strtemp)-1)
endif
endfor

备注：LOCAL表示局部， i,j,k,strTemp是自定义的局部变量而已。