RosettaCodeData/Task/Least-common-multiple/Common-Lisp/least-common-multiple-1.lisp

5 lines
52 B
Common Lisp

CL-USER> (lcm 12 18)
36
CL-USER> (lcm 12 18 22)
396