x0

x0 + h

Punkt P

Sekante

Tangente

f(x0 + h)

f (x0)

Sekantensteigung ms = 

Tangentensteigung  mt = 

Tangentensteigung

U. Konrad 2011

f(x) = -x^(3.0) + 3.0 * x^(2.0)
A = Point(f)
h = 1.14 (slider from 0 to 3, step 0.01)
a = OrthogonalLine(A, xAxis)
B = Intersect(a, xAxis)
C = Point(Circle[B, h])
b = Segment(B, C)
c = OrthogonalLine(C, b)
P = Intersect(f, c)
d = true
e = Segment(A, P)
g = OrthogonalLine(A, c)
D = Intersect(c, g)
i = Segment(A, D)
j = Segment(D, P)
k = Segment(P, C)
l = Segment(A, B)
m_1 = true
n = Tangent(A, f)
o = true
p = OrthogonalLine(A, yAxis)
q = OrthogonalLine(P, yAxis)
E = Intersect(q, yAxis)
F = Intersect(p, yAxis)
Text2: j / i + ""
m = Slope(n)
Text4: m + ""
r = Line(P, A)