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