RosettaCodeData/Task/Least-common-multiple/Ring/least-common-multiple.ring

14 lines
189 B
Plaintext

see lcm(24,36)
func lcm m,n
lcm = m*n / gcd(m,n)
return lcm
func gcd gcd, b
while b
c = gcd
gcd = b
b = c % b
end
return gcd