窗体上有一个名称为Commandl的命令按钮，并有如下程序： Private Sub Commandl Click() Dim rrl AS Integer，n As Integer m=InputBox(”输入第一个数”)

admin2012-12-21 40

问题窗体上有一个名称为Commandl的命令按钮，并有如下程序：
Private Sub Commandl Click()
Dim rrl AS Integer，n As Integer
m=InputBox(”输入第一个数”)
n=InputBox(”输入第二个数”)
Do While m<>n
Do While m>n
m=m-n
Loop
Do While n>m
n=n-121
Loop
Loop
Print rn
End Sub
该程序的功能是( )。

选项 A、求数值m和D的最大公约数
B、求数值m和n的最小公倍数
C、求数值m和n巾的较大数
D、求数值m和n的较小数

答案A

解析此题的算法为经典的辗转相减法求最大公约数算法，也可用特殊值法求解。

转载请注明原文地址:https://jikaoti.com/ti/9EO0FFFM

本试题收录于：二级VB题库NCRE全国计算机二级分类