From c378d90bce65ae6c74e0ffca982f946554fa3009 Mon Sep 17 00:00:00 2001 From: Denis Costa Date: Wed, 20 Nov 2024 18:31:03 -0300 Subject: [PATCH] Solve Brazil World Cup in clojure --- solutions/beecrowd/1564/1564.clj | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 solutions/beecrowd/1564/1564.clj diff --git a/solutions/beecrowd/1564/1564.clj b/solutions/beecrowd/1564/1564.clj new file mode 100644 index 00000000..792284a1 --- /dev/null +++ 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)