main=interact$take 199.f.map read.reverse.words f(a:b:_)=last(show$a+b):' ':f[a+b,a]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page