9 GM39 : On va par quatre
Author: Frédéric Chanez
Date: 30 Août 2013

Aire =

Trapèze

Parallélogramme

Losange

Rectangle

Triangle rectangle

a = 9
E = (0, -1)
F = (9, -1)
j = Line(E, F)
A = Point(j)
B = Point(j)
s = LineBisector(A, B)
d = Segment(A, B)
S = Intersect(s, d)
r_1: a / d
b = OrthogonalLine(B, d)
c = OrthogonalLine(A, d)
ChampTexte1 = Textfield(a)
e = Line(A, B)
C = Point(e)
f = Circle(C, a / d)
g = OrthogonalLine(C, e)
D = Intersect(f, g, 2)
h = OrthogonalLine(D, e)
i = Line(D, e)
G = Intersect(b, i)
H = Intersect(c, i)
poly1, a_1, b_1, g_1, h_1 = Polygon(A, B, G, H)
I = (4, 2)
k = OrthogonalLine(I, j)
J = Intersect(j, e)
K = Intersect(k, j)
l = Segment(I, K)
r: a * 2 / l - d
p = Circle(I, r)
m = Line(I, d)
L = Intersect(p, m, 2)
poly2, a_2, i_1, l_1, b_2 = Polygon(A, I, L, B)
M = Point(i)
n = Segment(A, M)
q = Line(B, n)
N = Intersect(i, q)
poly3, m_1, n_1, b_3, a_3 = Polygon(M, N, B, A)
t = Circle(S, r_1)
P = Intersect(t, s, 1)
Q = Intersect(t, i, 1)
poly4, a_4, p_1, b_4, q_1 = Polygon(A, P, B, Q)
r_2: a * 2 / d
c_1 = Circle(A, r_2)
R = Intersect(c_1, c, 2)
poly5, b_5, a_5, r_3 = Polygon(A, R, B)
o = 1 (slider from 1 to 6, step 1)
d_1 = Segment(A, B)
e_1 = Segment(Q, P)
f_1 = OrthogonalLine(M, j)
O = Intersect(j, f_1)
j_1 = Segment(M, O)
α = Angle(B, A, R)
texte2: "Aire = " + b_3 + " · " + j_1 + " = " + a + " cm²"
texte4: "Aire = " + a_1 + " · " + h_1 + " = " + a + " cm²"
texte5: "Aire = (" + r_3 + " · " + b_5 + ") : 2 = " + a + " cm²"
texte1: "Aire = (" + b_2 + "+" + i_1 + ") : 2 · " + l + " = " + a + " cm²"
texte3: "Aire = (" + d_1 + " · " + e_1 + ") : 2 = " + a + " cm²"