SPOJ: ХБЕХ бодолт

Common Lisp хэл дээр маш хялбар бодож болж байгаа болохоор тавилаа.

http://www.spoj.com/CSMS/problems/CSMS0090/

(defun mine (n)

     (if (> n 0)

         (lcm n (mine (1- n)))

         1))

(print (mine (read)))