RosettaCodeData/Task/Sierpinski-triangle-Graphical/Zkl/sierpinski-triangle-graphical.zkl
2017-09-25 22:28:19 +02:00

4 lines
176 B
Text

const Order=8, Size=(1).shiftLeft(Order);
img:=PPM(300,300);
foreach y,x in (Size,Size){ if(x.bitAnd(y)==0) img[x,y]=0xff0000 }
img.write(File("sierpinskiTriangle.ppm","wb"));