在窗体上画一个命令按钮，名称为Command1，然后编写如下代码：Option Base 0Private Sub Command1_Click() Dim A1(4)As Integer， A2(4)As Integer For k＝0 To 2 A1(k＋1)＝InputBox("请输入一个整数") A2(3－k)＝A1(k＋1) Next k Print A2(k)End Sub程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为( )。
- A.0
- B.1
- C.2
- D.3
热度🔥517
参考答案：C
解析：
【解析】程序运行过程如下：k＝0，输入2，A1(k＋1)＝A1(0＋1)＝A1(1)＝2，A2(3－k)＝A2(3－0)＝A2(3)＝2k＝1，输入4，A1(k＋1)＝A1(1＋1)＝A1(2)＝4，A2(3－k)＝A2(3－1)＝A2(2)＝4k＝2，输入6，A1(k＋1)＝A1(2＋1)＝A1(3)＝6，A2(3－k)＝A2(3－2)＝A2(1)＝6k＝3，For循环结束，输出A2(k)的值即A2(3)的值，即2。
【解析】程序运行过程如下：k＝0，输入2，A1(k＋1)＝A1(0＋1)＝A1(1)＝2，A2(3－k)＝A2(3－0)＝A2(3)＝2k＝1，输入4，A1(k＋1)＝A1(1＋1)＝A1(2)＝4，A2(3－k)＝A2(3－1)＝A2(2)＝4k＝2，输入6，A1(k＋1)＝A1(2＋1)＝A1(3)＝6，A2(3－k)＝A2(3－2)＝A2(1)＝6k＝3，For循环结束，输出A2(k)的值即A2(3)的值，即2。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
