let () = let n = read_line () |> int_of_string and m = read_line () |> int_of_string in n / m / 1000 * 1000 |> string_of_int |> print_endline