1-ES
; spirale quadrataCLEARSCREENHOMEA=2cm ;utilizzo di una variabileREPEAT 40 [FORWARD ARIGHT 90A=A+0,2cm];aggiungiamo questi comandi all'interno del ciclo REPEATPENCOLOR ANYPENSIZE ANY ;oppurePENSIZE RANDOME [1,8,16];aggiungiamo una variabile che gestisca la rotazioneANGOLO = INT ( INPUT “ANGOLO?” )2-ES
;questo è un ciclo infinito di cerchi coloratiCLEARSCREENHOMEREPEAT [FILLCOLOR ANYPENCOLOR ANYPOSITION ANYCIRCLE 1cm];come limitare ad un numero di cerchi scelto dall'utente ed inserito come INPUT?;come creare automaticamente una serie di cerchi di diametro variabile?3-ES
HOMEPOSITION [100,100]HEADING 0CLEARSCREEN ;HIDETURTLE se vuoi nascondi la tartarugPENUPA=0FOR I IN RANGE 10 [LABEL STR (A) + “*” + STR (I) + “=” + STR (A*I)BACK 20]; richiedi all'utente di inserire un valore della tabellina da calcolare4-ES
CLEARSCREENHOMEPOSITION [100, 200]HEADING 90TO KOCH X TIF T>0 [T=T-1X=FLOAT (X/3)KOCH X TLEFT 60KOCH X TRIGHT 120KOCH X TLEFT 60KOCH X T ][ FORWARD 3*X ]ENDKOCH 50 6