let ``No.296 n度寝``() =
  
  let n, h, m, t =
    stdin.ReadLine().Split(' ')
    |> fun args ->
      args.[0]|>int, args.[1]|>int, args.[2]|>int, args.[3]|>int

  let rec wake (hour,min) n =
    match n with
    | 1 -> (hour, min)
    | _ -> wake (hour + (min + t) / 60 , (min+t)%60 ) (n-1)

  wake (h, m) n
  |> fun  (hr , mn )->
      stdout.WriteLine (hr%24)
      stdout.WriteLine mn

``No.296 n度寝``()