VB程序输入整数N,计算前N项和S=1+(1+2)+(1+2+3)+(1+2+3+4)+….

来源：学生作业帮助网 编辑：作业帮 时间：2024/10/02 18:45:12
VB程序输入整数N,计算前N项和S=1+(1+2)+(1+2+3)+(1+2+3+4)+….
x) sz&?m]lgS7XO;{^.tRO&6&ڏ$S(;+(,$U!4I9?771/09'39[C%3W!S'OXX3$5=,`ZQb"!`[~B&`\ZkWT R2 5r~@2LF`ABy) $فs

VB程序输入整数N,计算前N项和S=1+(1+2)+(1+2+3)+(1+2+3+4)+….
VB程序输入整数N,计算前N项和S=1+(1+2)+(1+2+3)+(1+2+3+4)+….

VB程序输入整数N,计算前N项和S=1+(1+2)+(1+2+3)+(1+2+3+4)+….
Private Sub Command1_Click()
Dim i,n,s As Integer
n = Val(Text1.Text)
s = 0
For i = n To 0 Step -1
s = s + i * (i + 1) / 2
Next i
Text2.Text = s
End Sub