(use srfi-1)
(print (max -1 (- (* (read) (read)) (apply + (list-tabulate (read) (^_ (read)))))))