Aller au contenu

Mathc initiation/a211

Un livre de Wikilivres.


Sommaire


Installer ce fichier dans votre répertoire de travail.


Texte de la légende
fa.h
/* --------------------------------- */
/* save as fa.h                      */
/* --------------------------------- */
double f(
double t)
{
       return( (2.+2.*cos(t)) );
}
char  feq[] =  "2.+2.*cos(t)";
/* --------------------------------- */
double g(
double t)
{
       return( (3) );
}
char  geq[] =  "3";

/* --------------------------------- */
double SectorArea(
double t)
{
/*
        Area = (f^2)/2 - (g^2)/2 dk
*/
     return(( ((f(t)*f(t))/2.) - ((g(t)*g(t))/2.) ));
}
/* --------------------------------- */
/* --------------------------------- */
fb.h
/* --------------------------------- */
/* save as fb.h                      */
/* --------------------------------- */
double f(
double t)
{
       return( (4.*cos(2.*t)) );
}
char  feq[] =  "4.*cos(2.*t)";
/* --------------------------------- */
double g(
double t)
{
       return( (2) );
}
char  geq[] =  "2";
/* --------------------------------- */
double SectorArea(
double t)
{
/*
        Area = (f^2)/2 - (g^2)/2 dk
*/
     return(( ((f(t)*f(t))/2.) - ((g(t)*g(t))/2.) ));
}
/* --------------------------------- */
/* --------------------------------- */