Afficher/Cacher le quadrilatère

 
Déplace les 3 points en couleurs afin d'obtenir les parallélogrammes suivants :

1) un rectangle
2) un losange
3) un carré

Écris dans chaque cas une propriété caractéristique.
 

Afficher/Cacher les consignes

Longueur des segments verts :

Longueur des segments oranges :

A = (1.900283820452091, 2.337616191372666)
c = 6 (slider from 1 to 10, step 0.5)
D = Point(Circle[A, c])
a = 3.5 (slider from 1 to 10, step 0.5)
B = Point(Circle[A, a])
u = Vector(A, B)
C = Translate(D, u)
f = Segment(A, B)
g = Segment(B, C)
h = Segment(A, D)
α = Angle(D, A, B)
i = OrthogonalLine(A, f)
D_1 = ClosestPoint(i, D)
l = Line(A, g)
q1, b_1, c_1, d, a_1 = Polygon(B, C, D, A)
e = false
testeg1: Distance[D, A] ≟ Distance[A, B]
testeg2: Distance[B, C] ≟ Distance[A, B]
testeg3: Distance[D, A] ≟ Distance[C, B]
s = Segment(D, C)
k = OrthogonalLine(A, h)
B_1 = ClosestPoint(k, B)
b = false