let n = 6

let () =
  let a = Array.init n (fun _ -> Scanf.scanf "%d " (fun i -> i)) in
  Array.fast_sort (-) a;
  Printf.printf "%.2f\n" (float (a.(1) + a.(2) + a.(3) + a.(4)) /. 4.)