4 lines
143 B
Text
4 lines
143 B
Text
full={{1,1,1},{1,0,1},{1,1,1}}
|
|
empty={{0,0,0},{0,0,0},{0,0,0}}
|
|
n=3;
|
|
Grid[Nest[ArrayFlatten[#/.{0->empty,1->full}]&,{{1}},n]//.{0->" ",1->"#"}]
|