设执行以下程序段时依次输入：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
热度🔥981
参考答案：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年计算机等级考试题库
推荐
设已有定义：float x；，则以下对指针变量p进行定义且赋初值的语句中正确的是( )。
在窗体上画一个名称为Combo1的组合框，名称为Text1的文本框，以及名称为Command1的命令按钮，如图所示。 运行程序，单击命令按钮，将文本框中被选中的文本添加到组合框中，若文本框中没有选中的文本，则将文本框中的文本全部添加到组合框中。命令按钮的事件过程如下：Private Sub Command1_Click() If Text1.Se1Length<>0 Then Else Combo1.AddItem Text1 End IfEnd Sub程序中横线处应该填写的是( )。
窗体上有名称为Command1的命令按钮和名称为Text1的文本框Private Sub Command1_Click() Text1.Text＝"程序设计" Text1.SetFocusEnd SubPrivate Sub Text1_GotFocus() Text1.Text＝“等级考试”End Sub运行以上程序，单击命令按钮后( )。
关于XMPP协议的描述中，错误的是
下列叙述中正确的是（ ）。
