gets
i=0
$_[i]<?1?i+=1:$_[i]-=1while($*.unshift$_.dup;!/^0+$/)
puts$*|[]