A = Point(c)
B = Point(c)
T_{A} = Tangent(A, c)
T_{B} = Tangent(B, c)
C = Intersect(T_{B}, T_{A})
poly1, c_1, a_1, b_1 = Polygon(A, B, C)
Textepoly1: "Aire " + (Name[A]) + (Name[B]) + (Name[C]) + " = " + poly1
a: x(A)
b: x(B)
f(x) = x^(2)
E = Intersect(yAxis, c_1)
g(x) = (y(B) - y(A)) / (x(B) - x(A)) x + y(E)
S = Integral(g, f, x(A), x(B))
r: poly1 / S
text2: "Aire entre les courbes =" + S
text1: "\frac{ T }{S } =" + r
text3: "x_{A} =" + a
text4: "x_{B} = " + b
text5: "x_{C} = " + (x(C))
text6: "y_{A} = " + (y(A))
text7: "y_{B} = " + (y(B))
text8: "y(C) = " + (y(C))