Teorema fondamentale del calcolo

G.C. Barozzi
CIRAM - Università di Bologna

[Aggiornamento: gennaio 2001]

Riferimento:
G.C. Barozzi
Primo Corso di Analisi Matematica
Zanichelli, Bologna (1998), par.5.2

Clear["Global`"]

Questo notebook illustra il Teorema fondamentale del Calcolo, utilizzando la funzione x -> (x^2) - 3x + 2  sull'intervallo [0, 2.8].

Needs["Graphics`FilledPlot`"]

gr0 = 
        Plot[x^2 - 3  x + 2, {x, 0. , 2.8}, 
          PlotRange -> {{0, 2.8}, {-0.5, 3. }}, 
          PlotStyle -> {RGBColor[0, 0, 1], 
              Thickness[0.006]}];

Do[
	gr1 = FilledPlot[x^2-3x+2, {x,-0.001,s},
	    DisplayFunction -> Identity];
	gr2 = Plot[x^3/3 - 3x^2/2 + 2x, {x,-0.01,s},
	PlotPoints -> 5 + Floor[5 s], 
		PlotStyle ->{RGBColor[1,0,0], Thickness[0.01]},
		DisplayFunction -> Identity];
	Show[{gr1,gr2,gr0}, 
	AspectRatio -> Automatic,
	ImageSize -> {400,400},
		DisplayFunction -> $DisplayFunction],
	{s,0., 2.8, 0.025}
];