f(x) =

a =

b =

Approximation mit Trapezen

\downarrow

Integral

Approximation mit Rechtecken

f(x) = ℯ^((-1 / 2 * x^(2)))
a: -4
b: 4
n: 8
d = 1
Mn = 2.506547589369
Eingabefeld1 = Textfield(f)
Eingabefeld2 = Textfield(a)
Eingabefeld3 = Textfield(b)
XPunkte = Sequence((a + (i * d), 0), i, 0, n)
Trapeze = Sequence(Polygon[{(a + ((i - 1) * d), 0), (a + (i * d), 0), (a + (i * d), f(a + (i * d))), (a + ((i - 1) * d), f(a + ((i - 1) * d)))}], i, 1, n)
c = false
YPunkte = Sequence((a + (i * d), f(a + (i * d))), i, 0, n)
I = Integral(f, a, b)
e = false
Rechtecke = Sequence(Polygon[{(a + ((i - 1) * d), 0), (a + (i * d), 0), (a + (i * d), f(a + ((i - 1 / 2) * d))), (a + ((i - 1) * d), f(a + ((i - 1 / 2) * d)))}], i, 1, n)
g = true
Text1: "M_{" + (LaTeX[n]) + "} \approx " + (LaTeX[Mn]) + ""
i = 1 (slider from 1 to n, step 1)
Ri = Element(Rechtecke, i)
Text2: "\int\limits_{a}^{b} f(x) \; dx \approx " + (LaTeX[I]) + ""