Faire varier la longueur AB = a à l'aide du curseur

aire

a = AB

Afficher le graphique

Tracer point par point

Effacer le graphique

a = 8 (slider from 6 to 12, step 0.1)
A = (0, 0)
B: (a, 0)
C: (a, 12 - a)
D: (0, 12 - a)
poly1, a_1, b, c, d = Polygon(A, B, C, D)
e = Segment(A, C)
B' = Mirror(B, e)
f = Segment(A, B')
g = Segment(B', C)
N = Intersect(c, f)
poly2, a_2, d_1, n = Polygon(D, N, A)
P: (a, poly2)
h = OrthogonalLine(P, xAxis)
i = OrthogonalLine(P, yAxis)
E = Intersect(i, yAxis)
F = Intersect(h, xAxis)
j = Segment(E, P)
k = Segment(P, F)
Textepoly2: "Aire " + (Name[D]) + "" + (Name[N]) + "" + (Name[A]) + " = " + poly2 + ""