Programme : Le triangle de Sierpinski
Description du
programme
F
Ce programme dessine un fractal célèbre, le triangle
de Sierpinski, et le mémorise sous forme d'image.
Pour commencer, appuyez sur
le programme
SIERPINS
L'éditeur de programme s'affiche.
PROGRAM:SIERPINS
:FonctOff:EffDessi
n
:GraphNAff
:AxesNAff
:0!Xmin:1!Xmax
:0!Ymin:1!Ymax
:NbrAléat!X:NbrAlé
at!Y
:For(K,1,3000)
:NbrAléat!N
:If N1 à 3
:Then
:.5X!X
:.5Y!Y
:End
:If 1 à 3 <N and
N2 à 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
:SauveImage 6
Après avoir exécuté ce programme, vous pouvez
rappeler et afficher le dessin à l'aide de l'instruction
.
RappelImage 6
~ ~
et appuyez sur Í.
Choix des paramètres
FENETRE
Début du groupe
Groupe
/
If
Then
Groupe
/
If
Then
Groupe
/
If
Then
Dessin d'un point
Fin du groupe
Enregistrement de
l'image
Activités 17-11
. Nommez
1
For
For