Operation Manual

TI-83 Plus Anwendungsbeispiele 605
Programm zur Erstellung eines Sierpinski-
Dreiecks
Programm
Dieses Programm erzeugt die Zeichnung eines berühmten Fraktals, dem
Sierpinski-Dreieck und speichert die Zeichnung in einer Abbildung.
Beginnen Sie mit
~
~
1
. Benennen Sie das Programm
SIERPINS
und drücken Sie dann
Í
. Der Programmeditor erscheint.
PROGRAM:SIERPINS
:FnOff :ClrDraw
:PlotsOff
:AxesOff
:0!Xmin:1!Xmax
:0!Ymin:1!Ymax
Legt das Anzeigefenster fest.
:rand!X:rand!Y
:For(K,1,3000)
:rand!N
Beginn der
For
-Gruppe.
:If N
1
à
3
:Then
:.5X!X
:.5Y!Y
:End
If
/
Then
-Gruppe.
:If 1
à
3<N and N
2
à
3
:Then
:.5(.5+X)!X
:.5(1+Y)!Y
:End
If
/
Then
-Gruppe.