On a vu l'idée d'une procédure récursive : c'est une procédure qui s'appelle elle-même. Mais comment l'arrêter ? Avec l'instruction SI, c'est possible...
On peut alors faire des jolis dessins, comme par exemple cet arbre :)
Voici le code en logo :
to arbre :x
attends 30
fcc (liste hasard 256 hasard 256 hasard 256)
av :x
ga 30
av :x/3*2
si (:x>10) [arbre :x/3*2]
re :x/3*2
dr 60
av :x/3*2
si (:x>10) [arbre :x/3*2]
re :x/3*2
ga 30
re :x
end
Petit bonus pour les plus jolis dessins envoyés par e-mail avant mardi prochain 22 heures... On peut changer les couleurs, les longueurs, les formes, ... ;)
Aucun commentaire:
Enregistrer un commentaire