Vai al contenuto

Program

Da 3 a 25 lati

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

Mirino

  • Senza categoria

Il mirino segue il puntatore del mouse GraphicsWindow.BackgroundColor=”Black” w =GraphicsWindow.Width h =GraphicsWindow.Height r1=10 d1=2*r1 r2=20 d2=2*r2 While “true” wm=GraphicsWindow.MouseX hm=GraphicsWindow.MouseY GraphicsWindow.Clear() GraphicsWindow.PenColor=”white” GraphicsWindow.DrawLine( 0, hm,… Leggi tutto »Mirino

Program

La libreria Program fornisce strumenti per controllare l’esecuzione del programma. Strumento Argomenti Risultato Descrizione ArgumentCount numero Restituisce il numero degli argomenti di linea di comando passati a… Leggi tutto »Program