Problem 3 in Clojure