Counting Adventure 10 by pooq

a:=File standardInput readLine asNumber
for(i,0,2**a-1,for(j,a,1,-1,write(if((i%2**j/2**(j-1)|0)<1,".","#")));writeln)

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

download

return to the top page