Scanf.scanf "%s %s" (fun s1 s2 ->
    let q = if s2 = "Sat" || s2 = "Sun" then 1 else 0 in
    let q = if s1 = "Sat" || s1 = "Sun" then q + 1 else 0 in
    print_endline @@ match q with
    | 2 -> "8/33"
    | 1 -> "8/32"
    | _ -> "8/31"
)