4 lines
123 B
Text
4 lines
123 B
Text
procedure lcm(i, j) #: least common multiple
|
|
if (i = 0) | (j = 0) then return 0
|
|
return abs(i * j) / gcd(i, j)
|
|
end
|