\title{Potencia II}
\language{en}
\range{-3..3}
\author{Gang XIAO}
\email{xiao@unice.fr}
\computeanswer{yes}
\format{html}
\precision{10000}

\real{a=randint(20..80)/100}
\real{b=randint(20..80)/100}
\integer{big=random(0,1)}
\real{a=\big=1?\a+randint(1..5)}
\real{b=\big=1?\b+randint(1..5)}
\text{b=\big=1 and randint(0..10)<3 ? \a}
\text{a=random(-1,1)>0?\a:(-\a)}
\text{b=random(-1,1)>0?\b:(-\b)}
\text{pa=random(n,n,n,(n-1),(n-2),(n-3),(n-4),(n-5),(n+1),(n+2),(n+3),(n+4),(n+5))}
\text{pb=random(n,n,n,(n-1),(n-2),(n-3),(n-4),(n-5),(n+1),(n+2),(n+3),(n+4),(n+5))}
\integer{diff=evalue(\pa-\pb,n=0)}
\real{lim=(1-\b)/(1-\a)}
\real{lim=\diff>0 && \big=1?\lim*\a^\diff}
\real{lim=\diff<0 && \big=1?\lim*\b^(\diff)}
\text{lim=\big=1 and abs(\a) > abs(\b) ? no}
\real{lim=\big=1 and abs(\a) < abs(\b) ? 0}
\text{lim=\big=1 and \a+(\b)=0 ? no}

\statement{Calcular el límite de la sucesión (<i>u<sub>n</sub></i>), donde
<p><center>
\( u_n=(1+\a+\a^2+\a^3+...+\a^\pa)
/(1+\b+\b^2+\b^3+...+\b^\pb) )
</center> <p>
Introducir <tt>no</tt> si la sucesión es divergente.
}

\answer{lim(<i>u<sub>n</sub></i>)}{\lim,no}{type=default}
