para pared

poncl 0
bl
sl gd 90 av 170 bl gi 90 av 200
 sl gi 90 av 340 bl gi 90 av 200 sl
fin

para pelota
pared
HAZ "x 0
HAZ "d 1
HAZ "y 0
repite 60 [HAZ "x :x +( 10 * :d)
ponpos (lista :x :y)
bl
poncl 0 circulo 40  espera 5 poncl 7 circulo 40 sl
 SI :x > 120 [HAZ "d -1]
SI :x < -120 [HAZ "d 1]]
fin

semaforo

para CIRCULO
repite 30 [AV 10 gd 360 / 30]
fin

para semaforo
repite 2[AV 350 GD 90 AV 150 GD 90]
sl
av 110
gd 90
av 65

bl
poncolorrelleno 10 rellena

CIRCULO
repite 2 [gi 90
sl av 110 gd 90 bl CIRCULO]
gd  90 sl av 30
poncolorrelleno 4 rellena
av 100
poncolorrelleno 6 rellena
av 100
poncolorrelleno 2 rellena
ot

flores

flores

Flor color

EJERCICIO 7

EJERCICIO 6

EJERCICIO 5

EJERCICIO 4

EJERCICIO 3

EJERCICIO 2

EJERCICIO 1

Ejercicio 38

Ejercicio 37