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

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

admin2020-09-01  34
问题 设执行以下程序段时依次输入：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/uccp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)