u = 2 (slider from 0 to 30, step 0.01)
a = 1 (slider from 0 to 20, step 0.01)
f'_1(x) = (-x + 1 - a) exp(-x)
A = Intersect(f'_1, xAxis, (0, 0))
f_1(x) = (x + a) exp(-x)
c = Integral(f_1(x) + f'_1(x), 0, u)
d = Integral(f_1(x), 0, u)
e = Integral(f'_1(x), x(A), u)
text1: "Eingeschlossene Fläche" + "=" + d + ""
P_u: (u, f_1(u))
Q_u: (u, f'_1(u))
b = Segment(P_u, Q_u)
S_1 = Intersect(f'_1, f_1, (-0.5000000098020283, 0.8243606595912831))
f = Segment(Q_u, S_1)
g = Segment(P_u, S_1)
poly1, q_u, p_u, s_1 = Polygon(P_u, S_1, Q_u)
Textpoly1: "Fläche des Dreiecks" + " = " + poly1
h = Tangent(S_1, f_1)
i = Tangent(S_1, f'_1)
B = Point(h)
C = Point(i)
α = Angle(C, S_1, B)