We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 67273c5 commit 7edd734Copy full SHA for 7edd734
solutions/beecrowd/3084/3084.clj
@@ -0,0 +1,11 @@
1
+(ns main
2
+ (:require [clojure.string :as str]))
3
+
4
+(defn main []
5
+ (loop [line (read-line)]
6
+ (when line
7
+ (let [[hour-degree minute-degree] (map #(Integer/parseInt %) (str/split line #" "))]
8
+ (printf "%02d:%02d%n" (int (/ hour-degree 30)) (int (/ minute-degree 6))))
9
+ (recur (read-line)))))
10
11
+(main)
0 commit comments