dont voici le codage
\begin{verbatim}
 depart((0,0),(20,20),(2,10),2,2);
  grille(1);
  axes;
  graduationx(btex $+1$ etex);
  graduationy(btex $+1$ etex);
  draw courbe5(-5,5,100,x**2-4) withcolor jaune;
  draw courbe6(-2,9,100,-0.25*((x-4)**2)+(x-4)+3) withcolor violet;
  draw tangente6(1);
  draw paraver(2) dashed evenly;
  draw courbe7(-2,8,100,(x-4.25)**3+2*((x-4.25)**2)-(x-4.25)-1) withcolor orange;
  draw tangente7(5);
  draw Projection(pointcourbe7(3));
  draw parahor(-0.5) dashed evenly;
  marque_re:="hachure";
  draw entrecourbes(Cb6,Cb7);
  draw Projection(pointcourbe6(1));
  marquepoint(pointcourbe7(3));
  marquepoint(pointcourbe6(1));
  marque_re:="remplis";
  draw airesouscourbe6(6,7)ciel;
  draw airesouscourbe6(0.5,1.5);
  legendex(btex Abscisse $x$ etex);
  legendey(btex Ordonn\'ee $y$ etex);
  dotlabel.top(btex $A$ etex,placepoint(3,2));
  dotlabel.top(btex $pti1$ etex,pti1);
  dotlabel.top(btex $pti2$ etex,pti2);
  dotlabel.top(btex $pti3$ etex,pti3);
endfig;
\end{verbatim}