A = Intersect(xAxis, yAxis)
B = Point(xAxis)
C = (10, 6)
D = Point(yAxis)
poly1, a, b, c, d = Polygon(A, B, C, D)
k = 2 (slider from 0 to 6, step 0.1)
M: (k, 0)
N: (10, k)
P: (10 - k, 6)
Q: (0, 6 - k)
poly2, q, p, n, m = Polygon(Q, P, N, M)
texte1: "L'aire de PQMN est   " + poly2 + ""
texte2: "pour AM = " + k + ""
f = Factor(-2 * x^(2) + 16 * x - 30)