distance:=0; Point("O",0,0);Cacher("O"); pour i allant de 1 à 20 { ecart:=Math.min(i,21-i); rayon:=ecart*0.44; distance:=distance+ecart; nbTours:=Math.floor(distance*2*Math.PI/ecart); pour j allant de 1 à nbTours { point:=Point(distance*Math.cos(j*2*Math.PI/nbTours),distance*Math.sin(j*2*Math.PI/nbTours)); Cacher(point); disque:=CercleRayon(point,rayon); MettreCouleurRVB(disque,0,255*ecart/10,255*ecart/10); MettreRempli(disque,"vrai"); } }