RosettaCodeData/Task/Least-common-multiple/FutureBasic/least-common-multiple.basic

10 lines
208 B
Text
Raw Permalink Normal View History

2024-11-04 20:28:54 -08:00
int local fn gcd_rec( a as int, b as int )
if ( b == 0 ) then return a
end fn = fn gcd_rec(b, a % b)
int def fn lcm( a as int, b as int ) = abs(a * b) / fn gcd_rec(a, b)
print fn lcm(12,18)
HandleEvents