作业帮 > 综合 > 作业

VB程序!,计算并输出下面数列中前N(设N=8)项的和 ,,,.,.表示求阶乘)

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/07 12:13:55
VB程序!,计算并输出下面数列中前N(设N=8)项的和 ,,,.,.表示求阶乘)
前N(设N=8)项的和 阶乘计算我会啊,可是这个还要计算前N项的和啊!.另外:N是设的,要求是用适当方式输入N.就用InputBox好了
Private Sub Command1_Click()
Dim n As Integer,阶乘项 As Long,阶乘和 As Long
Do
n = Val(InputBox("请输入阶乘的项数(N≤8)"))
Loop Until n = 1
阶乘项 = 1
阶乘和 = 0
For i = 1 To n
阶乘项 = 阶乘项 * i
阶乘和 = 阶乘和 + 阶乘项
Next i
Print "前"; n; "个阶乘项的和是:"; 阶乘和
End Su