let () = let s, f = Scanf.scanf "%d %d " (fun s f -> s, f) in Printf.printf "%d\n" (1 + s / f)