s:"";p:1;c:1;sum((if(p=i)then(f:" ",c:c+1,p:p+c)else f:" ",s:sconc(s,i,f)),i,1,?read());print(s);
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page