let () =
  let n, m = Scanf.scanf "%d %d " (fun n m -> n, m) in
  Printf.printf "%d\n" (n / 1000 / m * 1000)