p:dispterms;r:?read\-line;m:substring;a:r();p(a);sum(p(sconcat(h:m(s:r(),1,2),smake(b-2," "),h,ssubst(""," ",m(s,2,b)))),i,3,b:slength(a));p(a);
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page