Programm Zur Erstellung Eines Sierpinski-Dreiecks - Texas Instruments Ti-83 Bedienungsanleitung

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
drücken Sie dann Í. Der Programmeditor erscheint.
PROGRAM:SIERPINS
:FnOff :ClrDraw
:PlotsOff
:AxesOff
:0! ! Xmin:1! ! Xmax
:0! ! Ymin:1! ! Ymax
:rand! ! X:rand! ! Y
:For(K,1,3000)
:rand! ! N
:If N1 à 3
:Then
:.5X! ! X
:.5Y! ! Y
:End
:If 1 à 3 <N and N2 à 3
:Then
:.5(.5+X)! ! X
:.5(1+Y)! ! Y
:End
:If 2 à 3 <N
:Then
:.5(1+X)! ! X
:.5Y! ! Y
:End
:Pt-On(X,Y)
:End
:StorePic 6
Nach der Ausführung des Programms können Sie die
Abbildung mit dem Befehl
anzeigen.
SIERPINS
Legt das Anzeigefenster
fest
Beginn der For
/ -Gruppe
If Then
If / Then -Gruppe
If / Then -Gruppe
Zeichnen eines Punktes
Ende der For
Abbildung speichern
RecallPic 6 abrufen und
Anwendungsbeispiele 17–11
und
-Gruppe
-Gruppe