Calculator User Manual

TI-83 Plus Activities 570
Using a Program to Create the Sierpinski
Triangle
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
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 N
1
à
3
:Then
:.5X!X
:.5Y!Y
:End
If
/
Then
group