Mathc initiation/Fichiers c : c79j

Installer et compiler ces fichiers dans votre répertoire de travail.

	`c01j.c`

/* ---------------------------------- */
/* save as c1j.c                      */
/* ---------------------------------- */
#include "x_hfile.h"
#include      "fj.h"
/* ---------------------------------- */
int main(void)
{
int      n =  2*50;
double   a =   .0;
double   b =  -.5;

 clrscrn();

 printf(" With the Simpson's rule.    (n = %d)\n\n"
        "    (%.3f\n"
        " int(      (%s)  dx = %.6f\n"
        "    (%.3f\n\n\n\n",n,  b, feq, simpson(f,a,b,n), a);

 printf(" With the antiderivative of f.\n\n"
        " F(x) = %s \n\n\n" 
        " F(%.3f) -  F(%.3f)  = %.6f \n\n\n", Feq, b,a, F(b)-F(a));
 
 stop();

 return 0;
}
/* ---------------------------------- */
/* ---------------------------------- */

Calculons l'intégrale avec la fonction simpson(f,a,b,n); puis avec sa primitive F(x).

Exemple de sortie écran :

 With the Simpson's rule.    (n = 100)

    (-0.500
 int(      (1/(x**2 + 1))  dx = -0.463648
    (0.000



 With the antiderivative of f.

 F(x) = atan(x) 


 F(-0.500) -  F(0.000)  = -0.463648 


 Press return to continue.

En déduire la primitive de

 Voir  : atan(x)' = 1/(x**2 + 1)  ==> ∫(1/(x**2 + 1)) dx = atan(x)