在窗体上画一个命令按钮，名称为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
热度🔥532
参考答案：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年计算机等级考试题库
推荐
下列选项中，在报表"设计视图"工具栏中有、而在窗体"设计视图"中没有的按钮是
若要调整产品的价格，下列查询方法中最便利的方式是
有以下程序：
#include
int fun (int x， int y )
{ if (x！＝y) return ( (x＋y) /2 )；
else return ( x )；
}
main()
{ int a＝4， b＝5， c＝6；
printf( "%d\n" ， fun(2*a,fun(b,c)));
}
下列关于集线器的描述中，错误的是（）
设有表示学生选课的三张表，学生S（学号，姓名，性别，年龄，身份证号），课程C（课号，课名），选课SC（学号，课号，成绩），则表SC的关键字（键或码）为（ ）。
