let () = let a = Scanf.scanf "%d\n" (fun x -> x) in let m = ((float_of_int a) /. 100.) *. 60. in let h = m /. 60. in let m' = if h = 0. then int_of_float m else (int_of_float m) mod 60 in let h' = 10 + (int_of_float h) in Printf.printf "%d:%d\n" h' m'