vb计算1!+3!+*****+(2n+1)!的代码Private Sub Command1_Click()Dim n As Integer, i As Integer, j As Integern = Val(InputBox("请输入N值"))m = 1: Sum = 0For i = 1 To 2 * n + 1 Step (2)For j = 1 To im = m * jNext jSum = Sum + mNext iPrint SumEn

来源:学生作业帮助网 编辑:作业帮 时间:2024/09/01 03:38:36
x)+Kznu @@rgOw{ rL;IOT(^CT5\5RiqC"-*#iv-x%O#$ف:O