VB多项式计算

来源：百度知道 编辑：UC知道 时间：2024/05/27 14:40:07
1*2*3/1+2*3*4/1+3*4*5/1+...+10*11*12/1=
这个多项式的程序如何编写，谢谢啦！
...发错了，是1/1*2*3+1/2*3*4+1/3*4*5+...+1/10*11*12=

这样就可以了

For i = 1 To 10
s = s + 1 / i * (i + 1) * (i + 2)
Next
Print s

另外提一下，我数学不好，不知道里面的/1有什么意义

Private Sub Command1_Click()
Dim a, sum As Integer
sum = 0
For i = 1 To 10
a = 1
For j = i To i + 2
a = a * j
Next
sum = sum + a / 1
Next
Print sum
End Sub

确实是很简单的。