problem033 in clojure