Code Crackle Pop

gistfile1.clj

(defn CracklePop
  []
  (let [crackle-sequence (for [n (range 1 101)
                               :let [div3 #(= 0 (mod % 3))
                                     div5 #(= 0 (mod % 5))]]
                           (cond
                            (and (div5 n) (div3 n)) "CracklePop"
                            (div3 n) "Crackle"
                            (div5 n) "Pop"
                            :else n))]
    (apply println crackle-sequence)))

#Written in python

for i in range(1, 101):
if i%3 == 0 and i%5 == 0:
print("CracklePop")
if i%3 == 0:
print("Crackle")
if i%5 == 0:
print("Pop")
else:
print(i)