read*,n;i=1;do1 k=0,n**.5/.7-1;1 print'(99(i0x))',(i,i=i,i+k);end
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page