n:=File standardInput readLine asNumber for(i,-n**.5/.7|0,-1,j:=i;s:="";loop(m:=j*(j=j-1)/2+i;m<n or break;write(s,m+1);s=" ");writeln)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page