cm

A = (0, 0, 0)
largeur = 32 (slider from 17 to 45, step 1)
B: (2 * largeur, 0, 0)
C: (0, largeur, 0)
D: (2 * largeur, largeur, 0)
poly1, a, b, d, c = Polygon(A, B, D, C)
e, E, F, G, H, faceABFE, faceBDGF, faceCDGH, faceACHE, faceEFGH, arêteAE, arêteBF, arêteDG, arêteCH, arêteEF, arêteFG, arêteGH, arêteEH = Prism(poly1, 20000 / largeur^(2))
f = Segment(A, E)
distanceAE = Distance(A, E)
TexteAE: Name[A] + (Name[E]) + " \, = \, " + distanceAE
K: (largeur, f)
A1: "x(" + (Name[K] + ")")
B1: "y(" + (Name[K] + ")")
A16 = 32
B16 = 19.53125
A15 = 33
B15 = 18.365472910927455
A14 = 32
B14 = 19.53125
A13 = 31
B13 = 20.81165452653486
A12 = 30
B12 = 22.22222222222222
A11 = 29
B11 = 23.781212841854934
A10 = 28
B10 = 21 (slider from -5 to 21, step 0.1)
A9 = 27
B9 = 21
A8 = 26
B8 = 21
A7 = 25
B7 = 21
A6 = 24
B6 = 21
A5 = 25
B5 = 21
A4 = 26
B4 = 21
A3 = 27
B3 = 21
A2 = 28
B2 = 21
aire: faceABFE + faceACHE + faceBDGF + faceCDGH + poly1
texte1: "Aire Totale =" * aire