a_n =

c =

Acercar

Alejar

c = Infinity
f(n) = (1 - n^(2)) / ((2 * n))
kdi = If(Defined[f(c + 1.0E-4)] ∧ Defined[f(c - 1.0E-4)] ∧ (abs(f(c + 1.0E-4) - f(c - 1.0E-4))  <  10), true, false)
k = Limit(f, c)
f1 = Textfield(f)
kt = If((abs(k)  <  10^(9)) ∧ Defined[k], k, If[kdi, round((100 * f(c + 1.0E-4))) / 100, If[Defined[k] ∧ (k > 0), Infinity, If[Defined[k] ∧ (k  <  0), -Infinity]]])
a = Textfield(c)
ki = If((abs(c) > 10^(9)) ∨ Defined[f(c - 1.0E-4)], true, false)
kd = If((abs(c) > 10^(9)) ∨ Defined[f(c + 1.0E-4)], true, false)
A: (c, f(c))
lista1: {Segment[(x(A), 0), A], Segment[(0, y(A)), A]}
g(n) = If[1 ≤ n ≤ Infinity, f(n)]
lista = Sequence((n, f(n)), n, 1, 1000)
tabla = TableText({{"n", "a_n"}, {"1", f(1)}, {"10", f(10)}, {"10²", f(100)}, {"10³", f(1000)}, {"10⁴", f(10000)}, {"10⁵", f(100000)}}, "c|_")
texto1: "\scalebox{1.6}{\lim_{ n \to " + (LaTeX[c]) + " }" + (LaTeX[f]) + "=" + (LaTeX[If[Defined[kt] ∧ kd ∧ ki, "" + kt, "indefinido"]]) + "}"