15 lines
249 B
Text
15 lines
249 B
Text
print "Least Common Multiple of 12 and 18 is "; LCM(12, 18)
|
|
end
|
|
|
|
function LCM(m, n)
|
|
LCM = abs(m * n) / GCD(m, n)
|
|
end function
|
|
|
|
function GCD(a, b)
|
|
while b
|
|
c = a
|
|
a = b
|
|
b = c mod b
|
|
wend
|
|
GCD = abs(a)
|
|
end function
|