问题库
search
首页 计算机 驾照考试 关于

设执行以下程序段时依次输入: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
浏览528
计算机二级office题库App
收录最新试题,随时随地刷题
参考答案: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。