1*2+2*3+3*4+4*5+…+N*(N+1)的和

来源:百度知道 编辑:UC知道 时间:2024/05/31 10:16:25
VB编程,窗体上有TEXT1和TEXT2的。
还有Command,

Private Sub Command1_Click()
Dim n, sum As Integer
n = Text1.Text
sum = 0
For i = 1 To n
sum = sum + i * (i + 1)
Next i
Text2.Text = sum
End Sub

给你算法.~~
n=inputbox"请输入N"
for i=1 to n
s=i*(i+1)+s
next i
print s