VB 求多个数的最大公约数，这应该是个比较简单的数学算法例子，求指定多个数的最大公约数，源码中请详细代码。部分代码如下： Private Function big(ByVal m%, ByVal n%) As Integer 自定义函数 If m < n Then t = m: m = n: n = t Do r = m Mod n 辗转相除法求最大公约数 If r = 0 Then Exit Do 找到最大公约数后即退出 m = n n =
源码：
a,b = 24,36
an_a = []
an_b = []
for i in range(1,a+1):
if(a%i==0):
an_a.append(i)
for i in range(1,b+1):
if(b%i==0):
an_b.append(i)
print("24的约数集合为：",end="")
print(an_a)
print("36的约数集合为：",end="")
print(an_b)
mul_a = []
mul
