let _ = stdin.ReadLine ()
let A = stdin.ReadLine () |> (fun l -> l.Split ()) |> Array.map (fun a -> int a)
let V = stdin.ReadLine () |> int

A |> Array.sum |> (fun a -> a - V) |> printfn "%d"