main = getLine >> getLine >>= print . foldl1 cardf . map read . words

cardf acc n
 | n<0 = abs acc - n
 | n==0 = abs acc
 | n==1 = abs acc + 1
 | n>=2 = abs acc * n