有如下程序段： Public Sub xy (a As Integer,b As

问题填空题

有如下程序段：
Public Sub xy (a As Integer,b As lnteger)
Dim t As Integer
Do
t=-a Mod b
a=b：b=t
Loop While t
Print a
End Sub
用Call xy(96,40)调用该通用过程后，输出结果是______。

答案

参考答案：H

解析： Mod是求模运算，所以t的值总是a除以b的余数。Do-Loop循环要执行若干次，每执行一次循环体，变量t、a和b都会取得一个新值，就是将上一次的除数作为下一次的被除数，将上一次a除以b的余数作为下一次的除数。当a被b整除后，结束循环的执行。用Call xy(96,40)语句调用该通用过程后，a取得数值96，b取得数值为40。xy通用过程的功能是求a和b的最大公约数。