Triangle de Sierpinski

Post date: Jun 9, 2017 11:17:36 PM

L'avantage de Géotortue c'est qu'on peut modéliser la 3D , en revanche sur Scratch il faudra se contenter du plan...

https://sites.google.com/site/stjomaths/scratch/_draft_post/logo_geotortue.PNG

Vous êtes libre d'utiliser Geotortue pour faire de l'algorithmique ! et de plus çà vous apprend à "pisser du code" contrairement à Scratch.

Bref à venir prochainement des modélisations de l'éponge de Menger

pyramide de Sierpinski avec geotortue! ceci est une modélisation avant de vous lancer dans la construction de la pyramide à l'aide de tickets de métro: https://www.youtube.com/watch?v=jvTlRkaNaQY

pour Sierpinski l n

si (n!=0) alors [ rep 3 [ Sierpinski l/2 n-1 ; base l; av 2*l; td 120; ]

tg 30;pvh acos(1/3); td 30; av 2*l;tg 30; pvb acos(1/3); td 30;

Sierpinski l/2 n-1 ;base l;

pvb 90; av l*√(24)/3; pvh 90; tg 90; av l*√(3)/3;td 90; re l;

re 2*l

]

fin

pour base longueur

rep 3 [ tetra longueur; av 2*longueur; td 120; ]

tg 30;pvh acos(1/3); td 30; av longueur;tg 30; pvb acos(1/3); td 30;

tetra longueur;

tg 30;pvh acos(1/3); td 30; av longueur;tg 30; pvb acos(1/3); td 30;

pvb 90; av longueur*√(24)/3; pvh 90; tg 90; av longueur*√(3)/3;td 90; re longueur;

av 2*longueur;

fin

pour tetra longueur

bc

triangle longueur;

tg 30;pvh acos(1/3); td 30;

triangle longueur;

tg 30; pvb acos(1/3);td 30; av longueur;td 120

tg 30;pvh acos(1/3); td 30;

triangle longueur;

tg 30; pvb acos(1/3);td 30; av longueur; td 120

tg 30;pvh acos(1/3); td 30;

triangle longueur;

tg 30; pvb acos(1/3);td 30; av longueur;td 120

lc

fin

pour triangle c

rep 3 [ av c; td 120 ]

fin

En voila un qui va faire des petits :)