1

tangente

sécante

carre

f_1(x) = x^(3) - (3 * x^(2)) + 4
m = -3 (slider from -10 to 5, step 0.1)
A = Point(f_1)
a: y = (m * (x - x(A))) + y(A)
B = Intersect(f_1, a, 3)
c = Circle(A, 1)
b = OrthogonalLine(A, yAxis)
C = Intersect(c, b, 1)
D = Intersect(c, b, 2)
d = OrthogonalLine(C, xAxis)
e = OrthogonalLine(D, xAxis)
g = OrthogonalLine(A, xAxis)
E = Intersect(c, g, 1)
F = Intersect(c, g, 2)
h = OrthogonalLine(F, e)
i = OrthogonalLine(E, e)
G = Intersect(e, h)
H = Intersect(d, h)
I = Intersect(d, i)
J = Intersect(e, i)
poly1, j, i_1, h_1, g_1 = Polygon(J, I, H, G)
k = Tangent(A, f_1)
m' = Slope(k)
l: x(A)
texte1: "f'(" + (LaTeX[l]) + ")=" + (LaTeX[m']) + ""
K: (x(A) + 1, y(A) + m' / 2)
L: (x(A) + 0.5, y(A))
f = false
o = false
n = false