eval'*A,G='+gets.split*?,
x=500
A.map{|a|(G-=a*x)<0&&G%=x
x/=[5,2][$.^=1]}
puts G>0?:NO: :YES