$<.map{|l|n=l.split.map &:to_i s=0 l=n.take_while{|e|s*2<n.reduce(:+)&&(s+=e)} puts l*" "+?|+n[l.size,99]*" "}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page