Scanf.scanf "%d:%d" (fun h m ->
    let m = m + 5 in
    let h = if m >= 60 then (h + 1) mod 24 else h in
    let m = m mod 60 in
    Printf.printf "%02d:%02d\n" h m
)