![](http://pdfasset.owneriq.net/0/8d/08d1842f-e1ff-4d59-970a-7dd00e6f50b7/08d1842f-e1ff-4d59-970a-7dd00e6f50b7-bg1ea.png)
Chapter 17: Activities 487
Using a Program to Create the Sierpinski Triangle
Using a Program to Create the Sierpinski TriangleUsing a Program to Create the Sierpinski Triangle
Using a Program to Create the Sierpinski Triangle
Setting up the Program
Setting up the ProgramSetting up the Program
Setting up the Program
This program creates a drawing of a famous fractal, the Sierpinski Triangle, and stores
the drawing to a picture. To begin, press ~ ~
1. Name the program SIERPINS, and
then press Í. The program editor is displayed.
Program
ProgramProgram
Program
PROGRAM:SIERPINS
:FnOff :ClrDraw
:PlotsOff
:AxesOff
:0!Xmin:1!Xmax
:0!Ymin:1!Ymax
Set viewing window.
:rand!X:rand!Y
:For(K,1,3000)
:rand!N
Beginning of For group.
:If N1à3
:Then
:.5X!X
:.5Y!Y
:End
If/Then group