y(E)

Stammfunktion anzeigen

i = 1 (slider from 0 to 1, step 0.1)
A = (0, 0)
B = Point(xAxis)
f(x) = 0.5 * x
n: round(Length[Vector[A, B]] / i)
s = LowerSum(f(x), x(A), x(B), n)
Flächeninhalt: (x(B), s)
Text1: "n = " + n
g = Integral(f(x))
Text2: "Flächeninhalt \quad \approx \quad" + s + " \quad E^2"
a = false