Uso De Un Programa Para Crear El Triángulo De Sierpinski - Texas Instruments TI-83 Manual

Uso de un programa para crear el triángulo de Sierpinski
Programa Este programa crea un dibujo de un famoso fractal, el
triángulo de Sierpinski, y lo almacena en una imagen.
Para empezar, pulse  ~ ~
nombre SIERPINS
programas.
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
Después de ejecutar este programa, puede recuperar y
visualizar la imagen mediante la instrucción
1 . Asigne al programa el
y pulse Í. Se mostrará el editor de
Define la ventana de
visualización
Inicio del grupo
Grupo
Grupo
Grupo
Dibuja un punto
Fin del grupo
Almacena la imagen
For
If / Then
If / Then
If / Then
For
RecallPic 6
Aplicaciones 17–11
.