Triangle by *yuko*

read*,n;m=n**.5/.7;do i=1-m,0;print'(99(i0x))',(j*(j+1)/2+i,j=1-i,m-(m*(m+1)/2+i-1)/n);enddo;end

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page