Der Punkt Q ist beweglich.

Tangente

f(x) = 0.25 x^(2)
P = Point(f)
Q = Point(f)
Sekante = Line(P, Q)
T2: "Funktion f mit f(x) =" + f
a = OrthogonalLine(Q, xAxis)
b = OrthogonalLine(P, yAxis)
A = Intersect(b, a)
d_y = Segment(A, Q)
d_x = Segment(P, A)
m: d_y / d_x
R, q, p, a_1 = Polygon(P, A, Q)
T1: "Steigung der Sekante s:  " + m
Tangente = Tangent(P, f)
c = true