g

g-

g + \epsilon

g - \epsilon

g

vorgegebene Streifenbreite:

vermuteter Grenzwert:

ermittelte Platznummer:

aktuelles Folgenglied:

Abstand zum Grenzwert:

a_n =

ε =

\epsilon =

g =

betrachtete Folge:

n

n_0

e0: 0.5
f(n) = 2 + 1 / sqrt(n)
s = Segment((5.5, 0), (94.5, 0))
g: 2
S = Sequence((i, 0), i, 1, 100)
N0 = Point(S)
N = Point(S)
G = Point(yAxis)
Eu: (0, g - e0)
Eu100: Eu + (100, 0)
Eo: (0, g + e0)
Eo100: Eo + (100, 0)
G1: G + (1, 0)
a: abs(f(x(N)) - g)
fGG1 = Ray(G, G1)
F = Sequence((i, f(i)), i, 1, 100)
O = Max(g + 2, 2)
U = Min(g - 2, -2)
Eo1: Eo + (1, 0)
Eu1: Eu + (1, 0)
h = Ray(Eo, Eo1)
i = Ray(Eu, Eu1)
j = OrthogonalLine(N0, xAxis)
f_{1} = 1 (slider from -5 to 5)
Fn: (x(N), f(x(N)))
k = Line(Fn, N)
A = Intersect(fGG1, k)
l1 = Segment(Fn, A)
Text9: "g = " + g + ""
Text11: "n_0 = " + (x(N0)) + ""
Eingabefeld1 = Textfield(f)
n: x(N)
an: y(Fn)
Text16: "a_{" + n + "}=" + an + ""
Text17: "a_{" + n + "}=" + an + ""
I2 = Segment(Fn, A)
Eingabefeld2 = Textfield(e0)
Eingabefeld3 = Textfield(g)
Text13: "a_{n} = " + (f(x(N))) + ""
Text18: "|a_n - g| = " + a + ""
Text15: "|a_n - g| = " + a + ""
n0: x(N0)
R = 11.5
Rechts: (R - 1, -1)
L = -0.5
Links: (L + 1, -1)
Fg = Sequence(If[abs(f(i) - g) < e0, (i, f(i))], i, 1, 100)
Fk = Sequence(If[abs(f(i) - g) ≥ e0, (i, f(i))], i, 1, 100)
Streifen(x, y) = x ≥ n0 ∧ g - e0 < y < g + e0
Text19: "n = " + n + ": a_n = " + an + ""