Sierpinski Carpet by hinoe

i;main(r,n){for(n="  \x1b\x03\x09"[n%5u];r&1||~write(i<=(r=n)*n,"::\n"+r,++i%n?2:3);)r=i/r%3&i/n/r%3&1?4:r/3;}

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

download

return to the top page