Scanf.scanf "%d" (fun n ->
    let x = Array.init n (fun _ -> Scanf.scanf " %d" (fun x -> x)) in
    let sum = Array.fold_left (+) 0 x in
    Array.iter (fun v ->
        Printf.printf "%d\n" @@ (100 * n - sum + v * n) / (2 * n)) x
)