Les complexes  - Exercices

A. Opérations sur les nombres complexes

Print["Calculer"];
i=1;
ex[i]=HoldForm[(2+4I)-2(1+3I)+(-5+7I)];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;
ex[i]=HoldForm[(2-5I)(3+3I)];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;
ex[i]=HoldForm[(3+2I)/(3-2I)];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;
ex[i]=HoldForm[(Sqrt[2]-2I)(1+3Sqrt[2]I)];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;
ex[i]=HoldForm[(2-Sqrt[3]I)^2];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;
ex[i]=HoldForm[(1+2I)^2 (2-Sqrt[2]I/2)];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;
ex[i]=HoldForm[(3+2I)/(3-2I)];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;
ex[i]=HoldForm[1/(3I+1)];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;
ex[i]=HoldForm[Sqrt[5]/(Sqrt[5]+I)];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;
ex[i]=HoldForm[(3-i)(2-I)/(1+2I)];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;

ex[i]=HoldForm[1/(2-Sqrt[3]I)^2];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;
ex[i]=HoldForm[(Sqrt[2]+2I)^3];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;

ex[i]=HoldForm[((2-Sqrt[7])/(Sqrt[7]+I))^2];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;

ex[i]=HoldForm[2Sqrt[6]/(Sqrt[2]-Sqrt[3]I)];sol[i]=ComplexExpand[ReleaseHold[ex[i]]];i++;

Do[Print[j,") ",ex[j]],{j,i-1}]

Solutions

Do[Print[j,") ",sol[j]],{j,i-1}]