Author: Mentrard
Date: Fevrier 2008

Animation

Aire = [(Grande Base + Petite Base) x Hauteur] : 2

Hauteur

Aire d'un trapèze

Aire du trapèze = Aire du parallélogramme : 2

Grande Base

Petite Base

Petite Base

t = 3.141592653589793 rad (slider from 0 to 3.141592653589793, step 0.017453292519943295)
C = (7.558650137741053, -1.1325619834710756)
B = (8.62531680440772, -4.965895316804408)
E = Midpoint(B, C)
I = Rotate(B, -t, E)
H = Rotate(C, -t, E)
A = (0, -5)
F = Rotate(A, -t, E)
a = Line(A, B)
a' = Mirror(a, E)
D = Point(a')
J = Rotate(D, -t, E)
P, c, d, e, l = Polygon(A, B, C, D)
r = 1.5 (slider from -5 to 5, step 0.1)
β = Angle(F, E, A)
δ = Angle(H, E, C)
ε = Angle(I, E, B)
poly1, f, h, i, m = Polygon(I, F, J, H)
b = Segment(C, E)
g = Segment(E, B)
D_1 = (-2.0680165289256123, -5.729228650137742)
j = OrthogonalLine(C, a)
G = Intersect(j, a)
k = Segment(C, G)
α = Angle(A, G, C)
u: 0.5 * Vector[A, B]
v: -0.5 * Vector[A, B]
w: -0.5 * Vector[D, C]
z: 0.5 * Vector[D, C]
M = Midpoint(A, B)
N = (17, 1)
O = (17.02531680440772, 0.45077134986225736)
n = Vector(N, O)
L = Translate(M, n)
Q = Midpoint(D, C)
K = Translate(Q, Vector[-n])
R = Midpoint(J, H)
p: 0.5 * Vector[J, H]
q: -0.5 * Vector[J, H]
R' = Translate(R, n)