integer::k,n,f
  integer,dimension(100)::a
  read *,k,n,f
  read *,a(1:f)
  print '(i0)', MAX(k*n-SUM(a(1:f)),-1)
end program