Solved 1, 2 on Common Lisp