*** Pour masquer/découvrir le code Asymptote qui a permis de créer la figure, il faut cliquer dessus. ;-) ***
- CODE ASYMPTOTE de la figure ci-dessus : Tout sélectionner
- unitsize(2cm);
- void pgcd(picture pic=currentpicture, int a, int b, pair A=(0,0), pair d=0){
- picture p;
- int k=0, a_=abs(a), b_=abs(b), r=a_;
- real y=0;
- while (r>0)
- {
- r=a_%b_;
- frame f;
- label(f,string(a_),(0,y),2W,basealign);
- label(f,"=",(0,y),basealign);
- label(f,string(b_)+"$\times$"+string(floor(a_/b_))+"+"+string(r),(0,y),2E,basealign);
- y -= size(f).y;
- a_=b_;
- b_=r;
- add(p,f);
- }
- label(p,format("\fbox{pgcd(%i",a)
- +format(";%i)=",b)
- +format("%i}",a_),truepoint(p,S),2S,red+basealign);
- add(pic,p.fit(),A,d);
- }
- real e=5;
- pgcd(1015,717,d=e*NW);
- pgcd(1015,716,d=e*NE);
- pgcd(1015,715,d=e*SW);
- pgcd(1015,714,d=e*SE);