APPLICAZIONI

Unisci i punti – 180

APPLICAZIONI

Disponi 360 chiodini lungo una circonferenza. Il primo filo collega il diametro in verticale. I fili successivi collegano il prossimo in alto con il prossimo… Leggi tutto »Unisci i punti – 180

Unisci i punti – 6

APPLICAZIONI

Sperimenta con il numero di punte della stella (nVERTICI) il numero di chiodini (nCHIODI) per ogni striscia il salto tra un vertice e l’altro (SALTO)… Leggi tutto »Unisci i punti – 6

Contare le occorrenze delle lettere dell’alfabeto all’interno di una frase testo=”ADDIO alle armi” For X=1 To Text.GetLength(testo) CAR=Text.GetSubText(testo, X, 1) CONTA[CAR]=CONTA[CAR]+1 EndFor c_A=Text.GetCharacterCode(“A”)… Leggi tutto »Contare le lettere

Bandiere – 2

APPLICAZIONI

Alle figure geometriche di base aggiungi delle immagini img=ImageList.LoadImage(“…”) GraphicsWindow.DrawImage(img, x,y) GraphicsWindow.DrawResizedImage(img, x,y, w,h) Alle figure di base bisogna aggiungere una stella bianca. Prepara l’immagine… Leggi tutto »Bandiere – 2

Bandiere – 1

APPLICAZIONI

Comincia utilizzando le funzioni di base GraphicsWindow.BrushColor=”…” GraphicsWindow.DrawLine(x1,y1, x2,y2) GraphicsWindow.FillEllipse(x,y, w,h) GraphicsWindow.FillRectangle(x,y, w,h) GraphicsWindow.FillTriangle(x1,y1, x2,y2, x3,y3) Un cerchio W=600 H=400 W2=W/2 H2=H/2 R=100 ‘ Raggio… Leggi tutto »Bandiere – 1