OO = 1 (slider from -5 to 5, step 0.1)
pente = 1 (slider from -10 to 5, step 0.1)
c = 3 (slider from -5 to 12, step 0.1)
g(x) = (pente * x) + OO + c
f(x) = x^(3) - (2 * x) + c
C = Intersect(f, g, 3)
A = Intersect(f, g, 1)
B = Intersect(f, g, 2)
texte1: "a =" + (x(A)) + ""
B1 = NaN
texte2: "b =" + (x(B)) + ""
airefg = IntegralBetween(g, f, x(A), x(C))
texte4: "Aire entre f et g =" + airefg + ""
texte3: "c = " + (x(C)) + ""
aireGeomfg: IntegralBetween[f, g, x(A), x(B)] + IntegralBetween[g, f, x(B), x(C)]
texte5: "Aire géométrique entre f et g = " + aireGeomfg + ""
h(x) = g(x) - f(x)
texte6: "Aire entre h et l'axes des abscisses =" + (Integral[h, x(A), x(C)]) + ""