A-A+

当运行下列程序 单击窗体后 分别输入72和24 信息框上显示的结果是【 】。 Private

2022-08-12 20:13:42 问答库 阅读 197 次

问题详情

当运行下列程序,单击窗体后,分别输入72和24,信息框上显示的结果是【 】。 Private Sub Form_Click() Dim x As Integer,y As Integer x=Val(InputBox("输入整数72")) y=Val(InputBox("输入整数24")) z=fun1(x,y) MsgBox Str(Z) End Sub Private Function funl(ByVal a As Integer, ByVal b As Integer)As Integer Do r=a Mod b a = b b = r Loop Until r=0 funl=a End Function


请帮忙给出正确答案和分析,谢谢!

参考答案

正确答案:24
由“欧几里德”求最大公约数的算法可知,当余数r为零时,a为a和b的最大公约数。72和24的最大公约数为6。“Mod”运算符用来对两个数做除法运算并且只返回余数。

考点:窗体,单击