100 by yvl

puts:zero,a=%w[one two three four five six seven eight nine],%w[ten eleven twelve],(b=%w[thir four fif six seven eigh nine]).map{|s|s+'teen'},['twen',*b].map{|t|[u=t.sub('u'){}+'ty']+a.map{|s|[u,s]*' '}},'one hundred'

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top