设执行以下程序段时依次输入:1、3、5,执行结果为 Dim a(4) As Integer Dim b(4) As Integer For K =0 To 2 a(K+1) = Val( InputBox("请输入

admin2021-07-08  22

问题 设执行以下程序段时依次输入:1、3、5,执行结果为
    Dim a(4) As Integer
    Dim b(4) As Integer
    For K =0 To 2
        a(K+1) = Val( InputBox("请输入数据:") )
        b(3-K) = a(K+1)
Next K
Debug.Print b(K)

选项 A、1
B、3
C、5
D、0

答案A

解析 本题考察For循环语句,计算数组b(K)的值。在程序中,首先定义了两个数组a(4)、b(4),之后执行For循环。当K=0时,进入第一次循环,将输入的1赋值给a(1),即a(1)=1,b(3)=a(1)=1;之后K=1,进入第二次循环,将输入的3赋值给a(2),即a(2)=3,b(2)=a(2)=3;之后K=2,进入第三次循环,将输入的5赋值给a(3),即a(3)=5,b(1)=a(3)=5,之后K=3,不满足循环条件,结束循环。输出b(3),值为1。
转载请注明原文地址:https://kaotiyun.com/show/IUvp777K
0

随机试题
最新回复(0)