Problem 5 in Clojure