let () =
  let n = Scanf.scanf "%d " (fun a -> a) in
  let d,x = Scanf.scanf "%d %d " (fun a b -> a,b) in
  let a_lst = Array.to_list @@ Array.init n (fun _ -> Scanf.scanf "%d " (fun a -> a)) in

  let l = List.map (fun a -> 1+ (d-1) / a) a_lst in
  let sum = List.fold_left (+) 0 l in

  Printf.printf "%d\n" @@ sum + x
