Resposta ao exercício 36
(defun mdc (a b) (if (= b 0) a (mdc b (mod a b))))