问题
填空题
有如下程序段： 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)调用该通用过程后，输出结果是 【15】 。
答案
参考答案：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的最大公约数。