性温,能散结消肿的药是E.
第1题
(25)下列程序的运行结果是 。 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 Command1_Click() Print myfun(9,8) End SubA.2 B.1 C.4 D.3
第2题
下列程序的运行结果是()。
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
my fun=m
End Function
Private Sub Command1_Click()
Print myfun(9,8)
End Sub
A.2
B.1
C.4
D.3
第3题
下列程序的运行结果是()。 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 Command1_Click() Print myfun(9,8) End Sub
A.2
B.1
C.4
D.3
第4题
下列程序的运行结果是()。
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 Command1_Click()
print myfun(9,8)
End Sub
A.2
B.1
C.4
D.3
第5题
下列程序的运行结果是()。 Private Function myfun(m,n) Do while m>n Do While m>n:m=m-n:Loop Do Wllile n>m:n=n-m:Loop Loop myfun=m End Function Private Sub Command1_Click() print myfun(9,8) End Sub
A.2
B.1
C.4
D.3
第6题
下面程序的运行结果是 ______ 。程序的功能是 _______ 。
Public 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 Command1_Click()
Print myfun(15,15)
End Sub
第7题
单击命令按钮时,下列程序的运行结果为
Private Sub Command1_Click()
Print Fun(23,18)
End Sub
Public Function Fun(m As Integer,n As Integer) As Integer
DO While m<>n
DO While m>n:m=m-n:Loop
DO While m<n:n=n-m:Loop
Loop
Fun=m
End Function
A.0
B.1
C.3
D.5
第8题
单击命令按钮时,下列程序的运行结果为
Private Sub Command1_Click()
Print Fun(23, 18)
End Sub
Public Function Fun(m As Integer, n As Integer) As Integer
Do While m <> n
Do While m > n: m=m - n: Loop
Do While m < n: n=n - m: Loop
Loop
Fun=m
End Function
A.0
B.1
C.3
D.5
第9题
单击命令按钮时,下列程序的运行结果为Private Sub Command1_Click() Print MyBM(23,18)End SubPublic Function MyBM(m As Integer,n As Integer)As Integer Do While m< >n Do While m > n:m=m - n:Loop Do While m < n:n=n - m:Loop Loop MyBM=mEnd Function
A.0
B.1
C.3
D.5
第10题
单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click() Print Fun(23,18) End Sub Public Function Fun(m As Integer,n As Integer)As Integer Do While m<>n Do While m>n:m=m-n:Loop Do While m<n:n=n-m:Loop Loop Fun=m End Function
A.0
B.1
C.3
D.5
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!