Great Common Divisor & Least Common Multiple(最大公约数和最小公倍数)
2006-10-19 23:16
531 查看
Function ZDGYS(ByVal m As Long, ByVal n As Long) As Long 'Great Common Divisor
ZDGYS = m
While n > 0
m = ZDGYS Mod n
ZDGYS = n
n = m
Wend
End Function
Function ZXGBS(ByVal m As Long, ByVal n As Long) As Long 'Least Common Multiple
ZXGBS = m * n / ZDGYS(m, n)
End Function
ZDGYS = m
While n > 0
m = ZDGYS Mod n
ZDGYS = n
n = m
Wend
End Function
Function ZXGBS(ByVal m As Long, ByVal n As Long) As Long 'Least Common Multiple
ZXGBS = m * n / ZDGYS(m, n)
End Function
相关文章推荐
- Great Common Divisor & Least Common Multiple(最大公约数和最小公倍数)
- HDU-1019-Least Common Multiple( 最大公约数 && 最小公倍数 && GCD )
- HDU 1019 Least Common Multiple(最小公倍数&最大公约数熟悉)
- 最大公约数(Greatest Common Divisor ) 与 最小公倍数(Lowest Common Multiple )
- 最大公约数 和最小公倍数。(max Common Divisor min common multiple)
- hdu 1019Least Common Multiple(最大公约数)
- 九度OJ 1056--最大公约数 1439--Least Common Multiple 【辗转相除法】
- hdoj Least Common Multiple 1019 && 2028 (n个数的最小公倍数)
- 九度OJ 1056--最大公约数 1439--Least Common Multiple 【辗转相除法】
- ACM--最大公约数--HDOJ 1019--Least Common Multiple--水
- HDOJ 1019 Least Common Multiple(最小公倍最大公约)
- HDU--IMNU集训四:Lowest Common Multiple Plus n个数的最大公约数 递归啊GCD啊之类的
- pyschool_Lowest Common Multiple_t5_q13(最大公约数)
- hdu 1019 Least Common Multiple(几个数的最小公倍数)
- hdu 1019 Least Common Multiple(数论:求最小公倍数)
- zoj1797 Least Common Multiple 最小公倍数
- Least Common Multiple&&http://acm.hdu.edu.cn/showproblem.php?pid=1019
- HDOJ1019 Least Common Multiple(求多个数的最小公倍数)
- HDU -> acm -> Least Common Multiple
- HDU 1019 Least Common Multiple(求最小公倍数)