设执行以下程序段时依次输入：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
热度🔥953
参考答案：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。
【解析】本题操作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。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
