N=gets.to_i
D=gets.split.map &:to_i
h={[]=>100}
N.times{
  t={}
  h.each{|k,v|
    ([*0...N]-k).each{|i|
      done=(k+[i]).sort
      hp=[[v+D[i],0].max,100+100*done.count{|j|D[j]<0}].min
      next if hp<=0
      t[done]=[t[done]||0,hp].max
    }
  }
  h=t
}
p h.values.max||0