单项选择题

下列程序的运行结果是( )。
Private Function myfun(m, n)
Do While m＞n
Do While m＞n:m=m-n:Loop
Do While n＞m:n=n-m:Loop
Loop
myfun=m
End Function
Private Sub Comrnand1 Click()
print myfun(9, 8)
End Sub

A．2
B．1
C．4
D．3

<上一题目录下一题>

热门试题

单项选择题

单击命令按钮时，下列程度段的执行结果是( )。 Private Sub Command1 Click() Dim a AS Integer, b As Integer, C AS Integer a=2:b=4:c=6 Call S1(a，b) Print a= ; a; b= ; b; c= ; C Call S2(a,b) Print a = ; a; b= ; b; c= ; c; End Sub Private Sub S 1(x As Integer, Y As Integer) Dim CAs Integer x=2 * x:y=y+2:c=x+y End Sub Sub S2(x As Integer, ByVal Y As Integer) Dim eAs Integer x=2 * x:Y=Y+2:e=x+y End Sub

A．a=4 b=6 c=6
a=4 b=6 c=6
B．a=8 b=6 c=6
a=8 b=6 c=6
C．a=4 b=6 c=6
a=8 b=6 c=6
D．a=8 b=6 c=6
a=4 b=6 c=6

填空题

二分法查找仅限于这样的表：表中的数据元素必须有序，其存储结构必须是______。

相关试题