open System let read() = Console.ReadLine().Split() |> Array.map (int) let K,N,F = let t = read() t.[0],t.[1],t.[2] let A = read() K * N - (A |> Array.sum) |> printfn "%i"