15273

Α: (3, 4)
B: (2, 5)
G: (-2, 2)
a = -0.4 (slider from -5 to 5)
M: ((4 * a) - 1, (3 * a) + 1)
t1, b, g, α = Polygon(G, Α, B)
t2, b_1, m, g_1 = Polygon(M, G, B)
Κείμενοt2: "Εμβαδόν του  " + (Name[M]) + (Name[G]) + (Name[B]) + " = " + t2
Σημείοt2 = PointIn(t2)
Κείμενοt1: "Εμβαδόν του  " + (Name[G]) + (Name[Α]) + (Name[B]) + " = " + t1
Σημείοt1 = PointIn(t1)