Exercices - Calcul de limites

Calculer les limites suivantes:

f[x_,1]:=Expand[(2x-5)(x+2)]/Expand[(1-x)(x-3)];
a[1]=1;

f[x_,2]:=Expand[(x+3)(1-3x)(x+5)]/Expand[(x+3)(5x-1)];
a[2]=-3;

f[x_,3]:=(x^4-5x^2+6)/(Sqrt[2]x^2-3x+Sqrt[2]);
a[3]=Sqrt[2];

f[x_,4]:=Expand[(1-2x)(1+3x)]/Expand[(x-2)(x+4)];
a[4]=-4;

f[x_,5]:=Expand[(1-2x)(1+3x)]/Expand[(x-2)(x+4)];
a[5]=Infinity;

f[x_,6]:=Sqrt[(3-5x)/(x^2-5x+3)];
a[6]=-Infinity;

f[x_,7]:=Sqrt[3x^2-5x+8]/Sqrt[5x^2-4];
a[7]=-Infinity;

f[x_,8]:=(x-4)/Sqrt[2x^2+1];
a[8]=-Infinity;

f[x_,9]:=(2Sqrt[x-3]-Sqrt[2x+2])/(5-Sqrt[3x+4]);
a[9]=7;

f[x_,10]:=((3x-2)^(1/3)-x^(1/3))/(1-x^2);
a[10]=1;
Do[lim[i]=Limite[f[x,i],x,a[i]];Print[i,") ",lim[i]],{i,10}]

Solutions

Do[Print[i,") ",Presente[lim[i]]],{i,10}]