add Solution 1-4 in Clojure