Date: 5 Octubre 2013

a

b

Ver tangente en A

f(x) = x^(3) / 18 - x^(2) / 4 + 2
A_2 = Point(xAxis)
i = Segment(A_2 + (0.001, 0), A_2 + (4, 0))
A: (x(A_2), f(x(A_2)))
B = Point(i)
B_1: (x(B), f(x(B)))
a = Line(A, B_1)
C: (x(B_1), y(A))
polígono1, b, a_1, c = Polygon(A, C, B_1)
t = Tangent(A, f)
Δy: y(B_1) - y(C)
Δx: x(C) - x(A)
texto4: "f(" + (LaTeX[x(B_1)]) + ")=" + (LaTeX[f(x(B_1))]) + ""
texto5: "f(" + (LaTeX[x(A)]) + ")=" + (LaTeX[f(x(A))]) + ""
e = false
texto6: "m_{t}=" + (LaTeX[Slope[t]]) + ""
g = Segment(A_2, A)
texto7 = LaTeX(f, true, true)
h = Segment(B, (x(B_1), y(A)))
texto2: " " + (x(C) - x(A)) + ""
texto1: " " + (y(B_1) - y(C)) + ""
P, Q = Extremum(f)
texto3: "TVM=\frac{" + (LaTeX[Δy]) + "}{" + (LaTeX[Δx]) + "}=" + (LaTeX[Δy / Δx]) + ""