设有如下Command1的单击事件过程及fun过程：Private Sub Command1_Click() Dim x As Integer x＝Val(InputBox("请输入一个整数")) fun(x)End SubPrivate Sub fun(x As Integer) If x Mod 2＝0 Then fun(x / 2) Print x；End Sub执行上述程序，输入6，结果是( )。
- A.3 6
- B.6 3
- C.6
- D.程序死循环
热度🔥561
参考答案：A
解析：
【解析】题目中fun过程是一个递归过程，它的结束条件是参数值为奇数。第一次调用，参数值为6，是偶数所再次调用fun过程，这次参数为6/2＝3，是奇数，不再调用自身，接着执行下一句输出参数值即3，然后返回第一次调用过程中执行下一句输出第一次调用参数值，即6。因此程序会输出3 6。
【解析】题目中fun过程是一个递归过程，它的结束条件是参数值为奇数。第一次调用，参数值为6，是偶数所再次调用fun过程，这次参数为6/2＝3，是奇数，不再调用自身，接着执行下一句输出参数值即3，然后返回第一次调用过程中执行下一句输出第一次调用参数值，即6。因此程序会输出3 6。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
下列选项中，不是 Access 数据库对象的是
有以下程序：
#include
main()
{ int x＝1， y＝0， a＝0， b＝0；
switch (x)
{ case 1：
switch(y)
{ case 0： a＋＋； break；
case 1： b＋＋； break；
}
case 2： a＋＋； b＋＋； break；
case 3： a＋＋； b＋＋；
}
printf("a＝%d， b＝%d\n"， a， b)；
}
程序的运行结果是( )。
有以下程序
#include
struct S{ int n; int a[20]; };
void f(int *a, int n)
{
int i;
for (i=0; i
关于数据报交换技术的描述中，错误的是
