Author: Daniel Mentrard
Date: 16 avril 2009

Área \;  = \;  \frac{ B  \; x  \; h }{2 } 

Puedes mover los puntos A, B y C.

¿Porqué el área de un triángulo es igual al
semiproducto de la base por su altura? 

Base

A = (-0.5, -1.68)
B = (13.02, -1.76)
C = (3.2800000000000002, 4.64)
poly1, a, b, base = Polygon(B, C, A)
d = Line(A, B)
e = OrthogonalLine(C, d)
D = Intersect(d, e)
h = Segment(C, D)
E = Midpoint(a)
Animación = 0 (slider from 0 to 180, step 1)
A' = Rotate(A, (Animación * 3.14 / 180), E)
B' = Rotate(B, (Animación * 3.14 / 180), E)
C' = Rotate(C, (Animación * 3.14 / 180), E)
poly2, c', a', b' = Polygon(A', B', C')
poly3, b_1, c, d_1 = Polygon(C, D, B)
poly4, d_2, c_1, a_1 = Polygon(C, A, D)
F: A + ((base * Animación / 180), 0)
u = Vector(A, F)
C'_1 = Translate(C, u)
A'_1 = Translate(A, u)
D' = Translate(D, u)
poly4', d', c'_1, a'_1 = Polygon(C'_1, A'_1, D')
H = Midpoint(c)