VB 程序求“最大公约数”程序码？求它们的最大公约数和最小公倍数。以下是查找最大公约数的代码，vb beg 最大公约数嗯，就用中国古代数学家的“更贬义的手法”吧，你要前两个号码最大公约数，(y)，你的群号最大公约数是1，这样做就没意思了，vb Find 16和24最大公约数Find code最大公约数算法:(1)将两个整数A和B相除:① A% B得到余数C2如果c0，则B是这两个数的最大公约数。
1、VB 最大公约数:privateupdigys(MAS integer，nasinteger)求两个数最大公约数dimrasintegerrmmodndower 0 mnrmmodnlooppendprivateucommand 1 _ click()生成酉完全数dimnasinteger，dasinteger，xasinteger，
sumAsInteger，rasinteger for 6 to 200 sum 0 for 1 to(n1)If(nModd)0 then xn/dCallgys(d，x)ifx thensumsum dendifendifnextdifsumntpicture 1。PrintnEndIfNextnEndSubFunctiongbs(AAsLong，
2、编写一个 vb 程序,输入两个正整数,求他们的 最大公约数和最小公倍数,谢...最大公约数functiongetgcd(num 1 aslong，num 2 aslong)aslongmianforiif(num 1 bthencadbelsecbdaendifdoundicmod 0 cmodddcddlloopmsbox
