有如下事件过程: Private Sub Form_Click() Dim a As Long, b As Long Dim sum As Long Dim x As Integer a = 1 b = 1

admin2019-03-14  26

问题 有如下事件过程:
Private Sub Form_Click()
    Dim a As Long, b As Long
    Dim sum As Long
    Dim x As Integer
    a = 1
    b = 1
    For x = 1 To 11 Step 2
        a = b * x
        ________
        s = s + a
        sum = sum + s
    Next x
    Print sum
End Sub
以上程序的功能是,计算 1!+(1!+3!)+(1!+3!+5!)+…+(1!+3!+5!+…+11!) 的值并输出。程序不完整,在________处应填入的内容是

选项 A、b = a * (x + 1)
B、a = a * (x - 1)
C、a = a * (x + 1)
D、b = a * x

答案A

解析 最简单的方法,直接代入一些数字,如x=1时,A) b=2a;B) a=0;C)a=2a;D)b=a;
再代入程序中,知B选项不符合题意。当循环体执行了两次,即当x=3时,再分别将A、C、D的答案代入程序中,知C和D选项错误;另一种方法是,本程序的主要由累加和累乘两种运算结合在一起,分析内容,可知,a=b*x,实现的是记录单个数值,如:1!、3!、5!、7!等,空格处的功能,是要保存下一次阶乘的值,如7!等价于a=b!*7,b的值应该是b=a*(7+1);故本题正确答案为A。
转载请注明原文地址:https://jikaoti.com/ti/EXN0FFFM
0

最新回复(0)