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

admin2012-12-21  38

问题 窗体上有一个名称为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
0

最新回复(0)