let rec make_list n f =
    if n = 0 then []
    else let e = f () in e :: make_list (n - 1) f

let () =
    let n, x =
        read_line ()
        |> (fun line -> Scanf.sscanf line "%d %d" (fun a b -> a, b))
    in
    let m = make_list n read_int in
    let min :: _ = List.sort compare m in
    let sum = List.fold_left (+) 0 m in
    Printf.printf "%d\n" (n + (x - sum) / min)
