Solve Brazil World Cup in clojure

Author: deniscostadsc

solutions/beecrowd/1564/1564.clj

@@ -0,0 +1,11 @@
+(ns main)
+
+(defn main []
+  (loop [line (read-line)]
+    (when line
+      (if (= line "0")
+        (println "vai ter copa!")
+        (println "vai ter duas!"))
+      (recur (read-line)))))
+
+(main)