teil 1

teil 2

K(x) = x^(3) - 30 x^(2) + 400 x + 512
K' = Derivative(K)
W = TurningPoint(K)
Kostenkehre = OrthogonalLine(W, xAxis)
STK(x) = K(x) / x
STK' = Derivative(STK)
BOpt = Root(STK', 10)
t(x) = 208 x
A = Intersect(K', STK, (16.00000000000005, 208.00000000000182))
BetriebsOptimum = Line(A, BOpt)
B = Intersect(K, yAxis, 1)
C = Intersect(K, BetriebsOptimum, 1)
LPU: STK(x(BOpt))
E(x) = LPU x
Preis = 293 (slider from 0 to 533, step 1)
E1(x) = Preis x
G(x) = E1(x) - K(x)
D, G1, G2 = Root(G(x))
F, Gmax = Extremum(G(x))
xGmax = OrthogonalLine(Gmax, xAxis)