230问答网 > VB编写程序，计算并输出下面级数前n项中(n＝50)奇数项的和。 1*2*3+2*3*4+3*4*5+……+n*(n+1)*(n+2)+…

VB编写程序，计算并输出下面级数前n项中(n＝50)奇数项的和。 123+234+345+……+n(n+1)(n+2)+…

2024-11-27 07:45:28

推荐回答（1个）

回答1：

Private Sub Command1_Click()
Dim i As Long, sum As Long
For i = 1 To 50 Step 2
sum = sum + i * (i + 1) * (i + 2)
Next
MsgBox "级数前50项奇数项和为：" & sum
End Sub

最新问答

变身+唱歌+好多衣服的动画片，除了变身偶像公主，一定要符合要求

我相亲对象是上门女婿，他今年25岁比我大五岁。现在我还不想结婚，他家那边一直催，他对我挺好。就是怕

太老实的男人有什么表现

有没有上古卷轴5高配整合版（带游戏本体）的，还要用ECE捏脸，不要RaceMenu。谢谢！

谈恋爱一定要去旅游吗?

央广购物怎么样

我们俩都是再婚我有一个女儿,她有俩孩子判给男方了,可是我跟她想要个孩子,请

南京市的旅游形象标志是什么

当一个人没有时间观念了怎么办？

呼和浩特哪个饭店有双人雅间?急！求帮忙.或是环境好，适合恋爱。