Resposta ao exercício 15

(defun soma1 (a b)
  (if (zerop a)
    b
    (1+ (soma1 (1- a) b))))