Fichier courbes007.mp (figure 1) — Modifié le 28 Mars 2008 à 21 h 49
input courbescp13;
beginfig(1);
depart((0,0),(10,10),(5,3),1,0.5);
draw grille(0.5);
draw axes;
graduantx.bot;
graduationy(btex $1$ etex,2);
draw courbe1(-4,3.5,100,(x-1)*(x-2)*(x+3)) withcolor violet;
marque_re:="hachure";
draw airesouscourbe1(-3,-1,0);
marque_re:="remplis";
draw airesouscourbe1(1,2,rose);
draw tangente1(2.5);
draw labelise1(btex $y=x^3-7x+6$ etex,0.925);
draw parahor(-3);
draw Projection(pointcourbe1(0.5));
label.top(btex $y=m$ etex,placepoint(-4,-3));
endfig;
end