用VB编写1!+2!+3!+......+20!+21!=? 用For......next嵌套循环

答案:3 悬赏:10

解决时间 2021-02-04 20:04

提问者网友：乏味沐染
2021-02-04 00:34

唉，抱歉，打错题了
1！+3！+5！+7！+......+19!+21!=?

最佳答案

二级知识专家网友：而你却相形见绌
2021-02-04 00:44

Private Sub Form_Load
dim vbresult as double,vbx as double
vbresult = 0
for i = 1 to 21 step 2
vbx=1
for j = 1 to i
vbx=vbx*j
next j
vbresult = vbresult +vbx
next i
结果：5.1212944273488E+19

全部回答

1楼网友：情窦初殇
2021-02-04 02:11

我来更正一下一楼的问题1：如果在代码开头未用option explicit强制要求声明，变量在使用前是可以不声明的，所以a可以直接使用。如果是这样： option explicit private sub command1_click() a="" ...... 那么程序就会报错了，不但a，下面的n、s、i都要显式声明才能使用。尽量使用option explicit的方式，可以减少程序中因为变量名冲突或未定义而引起的错误。

2楼网友：厭世為王
2021-02-04 01:36

- -！虽说是要求嵌套循环，不过这类题不用嵌套，而且计算次数还少，计算5!的时候可以直接用上次的3!的结果。 Dim i As Integer, j As Single, r As Single j = 1: r = 0 For i = 1 To 21 j = j * i If (i Mod 2) = 1 Then r = r + j Next Debug.Print r

我要举报

如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！