当前位置: 高中信息技术 / 综合题
  • 1. (2018高三上·宁波期末) 小乐编写了一个求最小公倍数的程序,他先借鉴更相减损术求出最大公约数,再求出最小公倍数。更相减损术是出自《九章算术》中的一种求最大公约数的算法,其原理是用大数减去小数,互相减来减去,一直到减数与差担等为止。在文本框Text1中输入一个整数,在Text2中输入另一个整数,单击“计算”按钮Command1,在Label3中输出两个数的最小公倍数。程序运行界面如图所示。

    1. (1) 根据程序代码判断,保证程序正常运行,窗体中至少需要个对象。
    2. (2) 为了实现上述功能,请在画线处填入合适的代码。

        Private Sub Command1 Click()

        Dim m As Integer,n As Integer

        Dim gys As Integer

        m=Val(Text1.Text)

        n=Val(Text2.Text)

        a=m:b=n

        Do While m<>n

          If    ①     Then m=m-n Else n=n-m

        Loop

        gys=n

        Label3.Caption=“最小公倍数是:”+     ②   

        End Sub

       ② 

    3. (3) 若在文本框Text1中输入15,在文本框Text2中输入6,单击“计算”按钮后,语句m=m-n执行了次。

微信扫码预览、分享更方便