exception InvalidInput
let () =
  let line = read_line () in
  let a, b = line |>
             Str.split (Str.regexp " ") |>
             List.map int_of_string |>
             (function | [a; b] -> a, b
                       | _ -> raise InvalidInput) in
  let d = a / b
  and m = a mod b
  and fd = ((float_of_int a) /. (float_of_int b)) in
  Prinf.printf "%d %d %.6f" d m fd