Solve Brazil World Cup in clojure

deniscostadsc · Nov 20, 2024 · c378d90 · c378d90
1 parent 228a20f
commit c378d90
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/solutions/beecrowd/1564/1564.clj b/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)