2. 计算机
  3. 以下程序的功能是计算并输出两个整数的最大公约数。 Private Sub al() Dim x As Integer，y As Integer，t As Integer x=InputBox(”请输入x的值”) y=Inpu

以下程序的功能是计算并输出两个整数的最大公约数。 Private Sub al() Dim x As Integer，y As Integer，t As Integer x=InputBox(”请输入x的值”) y=Inpu

admin2020-09-01  68
问题 以下程序的功能是计算并输出两个整数的最大公约数。
    Private Sub al()
    Dim x As Integer，y As Integer，t
As Integer
    x=InputBox(”请输入x的值”)
    y=InputBox(”请输入y的值”)
    Do
    x=y
    y=t
    Loop While(t＜＞O)
    Debug．Print__________
    End Sub
    有如下语句：
    ①t=x②t=y③t=x＼y
    ④t=x Mod y
⑤x⑥y⑦t⑧x／y
程序中有两个横线，将程序补充完整的正确语句是(    )。
选项 A、①⑦
B、②⑥
C、③⑧
D、④⑤
答案D
解析 本题考查Do循环语句。最大公约数是指某几个整数的共有公约数中最大的那个数。如1 5和20这两个数的最大公约数为5。程序段首先从键盘接收两个整数赋值给x和y，然后执行语句t=x Mod y进行取余数运算。
    如果x小于y，余数为x，赋值给t，然后用x=y、y=t语句交换x和y的值，返回的Do循环开始重新执行循环语句t=x Mod y。
    如果x大于y，则直接进行取余数运算，如果余数不是0，执行语句t=x Mod y，x=y，y=t，直到t为0时，y就是两个数的最大公约数。故本题答案为D。
转载请注明原文地址:https://www.kaotiyun.com/show/Hqcp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)