设有如下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.程序死循环
热度🔥575
参考答案：A
解析：
【解析】题目中fun过程是一个递归过程，它的结束条件是参数值为奇数。第一次调用，参数值为6，是偶数所再次调用fun过程，这次参数为6/2＝3，是奇数，不再调用自身，接着执行下一句输出参数值即3，然后返回第一次调用过程中执行下一句输出第一次调用参数值，即6。因此程序会输出3 6。
【解析】题目中fun过程是一个递归过程，它的结束条件是参数值为奇数。第一次调用，参数值为6，是偶数所再次调用fun过程，这次参数为6/2＝3，是奇数，不再调用自身，接着执行下一句输出参数值即3，然后返回第一次调用过程中执行下一句输出第一次调用参数值，即6。因此程序会输出3 6。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
有三个关系R，S和T如下：
则由关系R和S得到关系T的操作是
有以下程序
#include
void fun(int a[ ], int n)
{ int i,j=0,k=n/2, b[10];
for (i=n/2-1; i>=0; i--)
{ b[i] =a[j];
b[k] =a[j+1];
j+=2; k++;
}
for (i=0; i
在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，再编写如下程序：Dim ss As StringPrivate Sub Text1_KeyPress(KeyAscii As Integer) If Chr(KeyAscii)<>"" Then ss＝ss＋Chr(KeyAscii)End SubPrivate Sub Command1_Click() Dim m As String，i As Integer For i＝Len(ss)To 1 Step－1 m＝m＋Mid(ss，i,1) Next Text1.Text＝UCase(m)End Sub程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的是( )。
在数据库中，数据模型包括数据结构、数据操作和（ ）。
定义学生选修课程的关系模式如下：SC(S#,Sn,C#,Cn,G)(其属性分别为学号、姓名、课程号、成绩）该关系的范式最高达到（ ）。
