10
1
10
1
1
1
9
45
0
1
3.1
64
10
50
1
100
1
100
abc
text
abc
text
text
abc
abc
abc
abc
5
list
list
list
list
,
100
50
0
#ff0000
#3333ff
0.5
nbInitialObjets
valeursAsurveiller
pointsAsurveiller
n
x
niveau
point1
point2
point3
point12
point13
point23
Programme "triangle de Sierpinski"
nbInitialObjets
6
valeursAsurveiller
n
pointsAsurveiller
sierpinski
point12
point13
point23
EQ
niveau
0
point12
P
point13
P
point23
P
@3=(@1+@2)/2
point1
point2
point12
@3=(@1+@2)/2
point1
point3
point13
@3=(@1+@2)/2
point2
point3
point23
point12
point13
point23
@1=Polygon[@2,@3,@4]
tri
point12
point13
point23
MINUS
1
niveau
1
point1
point12
point13
MINUS
1
niveau
1
point2
point12
point23
MINUS
1
niveau
1
point3
point13
point23
tracerFigure
Fonction décrivant comment tracer la figure
n
n
sAB=Segment[A,B]
sAC=Segment[A,C]
sBC=Segment[B,C]
sAB
sAC
sBC
n
A
B
C