RosettaCodeData/Task/Least-common-multiple/Racket/least-common-multiple.rkt

#lang racket
(lcm 3 4 5 6)        ;returns 60
(lcm 8 108)          ;returns 216
(gcd 8 108)          ;returns 4
(gcd 108 216 432)    ;returns 108