Avalie novas classes de somas e produtos telescópicos 

Avalie uma soma indefinida usando telescopia de funções.

In[1]:=

X expr = 2^k/(3^k - 2^k);

In[2]:=

X expr1 = DifferenceDelta[expr, k]

Out[2]=

In[3]:=

X Sum[expr1, k]

Out[3]=

Some a expressão em intervalos finitos e infinitos.

In[4]:=

X Sum[expr1, {k, 1, n}]

Out[4]=

In[5]:=

X Sum[expr1, {k, 1, \[Infinity]}]

Out[5]=

Avalie um produto indefinido usando telescopia de funções.

In[6]:=

X expr = (Cos[b + a (((-1 + a^k) b)/(-1 + a) + a^k x)]^( b + a (((-1 + a^k) b)/(-1 + a) + a^k x)) + Sin[b + a (((-1 + a^k) b)/(-1 + a) + a^k x)])/( Cos[((-1 + a^k) b)/(-1 + a) + a^k x]^(((-1 + a^k) b)/(-1 + a) + a^k x) + Sin[((-1 + a^k) b)/(-1 + a) + a^k x]);

In[7]:=

X Product[expr, k]

Out[7]=