论坛广场 › VFP和数据库 › 计算1+(1+2)+(1+2+3)+(1+2+3+4)+……+(1+2+3+4+…+20)之和。两法

阿杰 发表于 2012-10-30 10:42:24

计算1+(1+2)+(1+2+3)+(1+2+3+4)+……+(1+2+3+4+…+20)之和。两法

Clea
?js1(10),js2(20)

&&方法1
Function js1(N)
Private s,i
s=0
For i=1 To 20
        s=s+js(i)
Endfor
Return s
Endfunc

&&方法2
Function js2(N)
Private s,i
s=0
For i=1 To N
        s=s+(N-i+1)*i
Endfor
Return s
ENDFUNC

&&计算1+2+3+...n的各
Function js(N)
Private s,i
s=0
For i=1 To N
        s=i+s
Endfor
Return s
Endfunc运行得出结果。
结果是1540

查看完整版本: 计算1+(1+2)+(1+2+3)+(1+2+3+4)+……+(1+2+3+4+…+20)之和。两法