let pr = fun x -> Printf.printf "%d" x in
Scanf.scanf "%f %f" (fun x y -> let a = y /. x in
                             match a with
                             | a when int_of_float y mod int_of_float x = 0 -> pr ((int_of_float a) + 1)
                             | _ -> (pr (int_of_float a)))