A-A+

设有以下函数过程:Function fun(a As Integer b As Intege

2022-08-05 19:53:55 问答库 阅读 171 次

问题详情

设有以下函数过程:
Function fun(a As Integer,b As Integer)
Dim c As Integer
If a<b Then
c=a:a=b:b=C
End IF
c=0
Do
c=c+a
Loop Until c Mod b=0
fun=c
End Function
若调用函数fun时的实际参数都是自然数,则函数返回的是()。
A.a、b的最大公约数
B.a、b的最小公倍数
C.a除以b的余数
D.a除以b的商的整数部分请帮忙给出正确答案和分析,谢谢!

参考答案

正确答案:B

B。【解析】本题考查了Do Loop循环,实现的是最小公倍数。本题中If语句实现了a和b交换。

考点:函数,过程