100 by medialuna

a=:'';' one';' two';' three';' four';' five';' six';' seven';' eight';' nine'
b=:'twenty';'thirty';'forty';'fifty';'sixty';'seventy';'eighty';'ninety'
c=:'ten';'eleven';'twelve';'thirteen';'fourteen';'fifteen';'sixteen';'seventeen';'eighteen';'nineteen'
p1=:'zero';(}.&.>(}.a)),c
p2=:(<@;)"1,/b,."(0 1)a
echo each p1,p2,<'one hundred'

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

download

return top