admin

Chaos game – 4

DOCUMENTAZIONE

Salto a 2/3 con scelta dei punti La regola è +0+1+3+4+5 La regola è +1 +3 +5 +7 … rand=Math.GetRandomNumber(4) If(rand=1) Then incr=1 ElseIf(rand=2) Then… Leggi tutto »Chaos game – 4

Chaos game – 3

DOCUMENTAZIONE

Con la regola del salto a metà distanza, si introduce una novità: la scelta del nuovo punto non è pienamente casuale. Il salto può essere… Leggi tutto »Chaos game – 3

Disegna dei tratti consecutivi con colore e spessore casuale GraphicsWindow.Height=GraphicsWindow.Width Turtle.Speed=10 SPAZIO =25 SPAZIO2=2*spazio xm=GraphicsWindow.Width -SPAZIO2 ym=GraphicsWindow.Height-SPAZIO2 While “true” x=Math.GetRandomNumber(xm)+SPAZIO y=Math.GetRandomNumber(ym)+SPAZIO GraphicsWindow.PenColor=GraphicsWindow.GetRandomColor() GraphicsWindow.PenWidth=Math.GetRandomNumber(10) Turtle.MoveTo(x,y) Program.Delay(500)… Leggi tutto »Figure casuali

Triangoli 2

APPLICAZIONI

Disegna il triangolo a partire dal centro di un lato Continua con 2, 3, 4, … Turtle.Speed=10 QUANTI=5 ANGOLO=360/QUANTI DIM=200 DIM2=DIM/2 Turtle.TurnLeft() For triangolo=1 To… Leggi tutto »Triangoli 2

Pentagono

DOCUMENTAZIONE

Poligono regolare con 5 lati di lunghezza 150 For lato=1 To 5 Turtle.Move(150) Turtle.Turn(72) EndFor Continua… GraphicsWindow.Height=GraphicsWindow.Width Turtle.Y=GraphicsWindow.Height/2 Turtle.Speed=10 QUANTI=15 ANGOLO=360/QUANTI For pentagono=1 To QUANTI For lato=1 To 5 Turtle.Move(150) Turtle.Turn(72)… Leggi tutto »Pentagono

« Precedente
1
…
6
7
8
9
10
…
60
Successivo »