f(x) = -1.0 * 0.06 * x^(2.0) + x + 1.0
A = Point(f)
a = OrthogonalLine(A, xAxis)
B = Intersect(a, xAxis)
b = Segment(A, B)
C = Point(xAxis)
c = OrthogonalLine(C, xAxis)
D = Intersect(f, c)
d = Segment(D, C)
e = Line(A, D)
k = Slope(e)
g = Derivative(f(x))
h: g(2.0)
text1: "Gesuchte Steigung der Tangente = " + h