I poligoni regolari da 3 a 25 lati DIM=800 GraphicsWindow.Height=DIM GraphicsWindow.Width =DIM GraphicsWindow.PenColor=”#66000066″ xC=DIM/2 yC=DIM/2 raggio=0.4*DIM For numeroLati=3 to 25 deltaAngolo=2*Math.Pi/numeroLati angolo=0 x1=xC+raggio*Math.Cos(angolo) y1=yC+raggio*Math.Sin(angolo) For… Leggi tutto »Da 3 a 25 lati
Considera i tre punti nel piano Utilizzeremo le regole dal Chaos game per realizzare il triangolo di Sierpinski. Week 9 – Advanced Challenge Write a… Leggi tutto »Chaos game – 1
500 linee 500 pallini 250 linee e pallini DIMX=800 DIMY=450 spazio=25 spazio2=2*spazio spazioX=DIMX-spazio2 spazioY=DIMY-spazio2 w2=DIMX/2 h2=DIMy/2 GraphicsWindow.Width =DIMX GraphicsWindow.Height=DIMY For i=1 To 500 x=Math.GetRandomNumber(spazioX)+spazio y=Math.GetRandomNumber(spazioY)+spazio… Leggi tutto »Linee e pallini
Tante… stelle con posizione e dimensione casuale Il colore giusto aiuta…
TextWindow.Write(“Enter a number: “) i = TextWindow.ReadNumber() isPrime = “True” PrimeCheck() If (isPrime = “True”) Then TextWindow.WriteLine(i + ” is a prime number”) Else TextWindow.WriteLine(i + “… Leggi tutto »Numeri primi