let n, d, x, a_s = Scanf.scanf " %d %d %d" @@ fun a b c -> a, b, c, Array.init a @@ fun _ -> Scanf.scanf " %d" (+) 0
let _ = Array.fold_left (fun c a -> c + (d - 1) / a + 1) x a_s |> Printf.printf "%d\n"