Algorithmes de calcul formel - Free
Algorithmes de calcul formel - Free
Algorithmes de calcul formel - Free
- No tags were found...
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
eta0:=0;r1:=x;beta1:=1;sqrtn:=float(sqrt(n));while r1>sqrtn dor2:= irem(r0,r1);q2:=(r0-r2)/r1;beta2:=beta0-q2*beta1;beta0:=beta1; r0:=r1; beta1:=beta2; r1:=r2;end_while;return(r1/beta1);end_proc;96