$f$

$A$

$\rotatebox{63.43}{\text{Tangente}}$

$x_0$

$h=%v$

$x_1$

$\mathit{}\text{\small Tangente anzeigen}$

$B$

$\text{Sekante}$

f(x) = x^(2)
A: (1, f(1))
t = Tangent(A, f)
x_0: (x(A), 0)
s_0 = Segment(x_0, A)
h = 1 (slider from -1 to 1, step 0.01)
x_1: (x(x_0) + h, 0)
a = false
B: (x(x_1), f(x_1))
g = Line(A, B)
i = Segment(x_1, B)
Text1: "Steigung der Sekante: " + (If[x_1 ≠ x_0, real((f(x_1) - f(x_0)) / (x_1 - x_0))]) + ""
Text2: "Steigung der Tangente: " + (f'(x_0)) + ""
T: (4 / (2 + h) + 1, 5)
TW: (atan(2 + h) * 180 / π)
Text3: "\rotatebox{" + (LaTeX[TW]) + "}{\text{Sekante}}"
s: 0