Solve Old Clock in clojujre

deniscostadsc · Dec 22, 2024 · 7edd734 · 7edd734
1 parent 67273c5
commit 7edd734
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/solutions/beecrowd/3084/3084.clj b/solutions/beecrowd/3084/3084.clj
@@ -0,0 +1,11 @@
+(ns main
+  (:require [clojure.string :as str]))
+
+(defn main []
+  (loop [line (read-line)]
+    (when line
+      (let [[hour-degree minute-degree] (map #(Integer/parseInt %) (str/split line #" "))]
+        (printf "%02d:%02d%n" (int (/ hour-degree 30)) (int (/ minute-degree 6))))
+      (recur (read-line)))))
+
+(main)