Mathc initiation/a489

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 a_n(
double n)
{
        return(   (1.)/factorial(n) );
}
char a_neq[] =    "(1)/(n)!";
/* ---------------------------------- */
double a_npls1(
double n)
{
        return(     (1.)/factorial(n+1) );
}
char a_npls1eq[] = "(1)/(n+1)!";
/* ---------------------------------- */
/* ---------------------------------- */
fb.h
/* ---------------------------------- */
/* save as fb.h                       */
/* ---------------------------------- */
double a_n(
double n)
{
        return(   (pow(n,n))/factorial(n) );
}
char a_neq[] =       "   (n**n)    /(n)!";
/* ---------------------------------- */
double a_npls1(
double n)
{
        return(    (pow(n+1,n+1))/factorial(n+1) );
}
char a_npls1eq[] = "(n+1)**(n+1))/(n+1)!";
/* ---------------------------------- */
/* ---------------------------------- */
fc.h
/* ---------------------------------- */
/* save as fc.h                       */
/* ---------------------------------- */
double a_n(
double n)
{
        return(  factorial(n)/(pow(n,n)) );
}
char a_neq[] =       "  (n)!/(n**n)";
/* ---------------------------------- */
double a_npls1(
double n)
{
        return(  factorial(n+1)/(pow(n+1,n+1)) );
}
char a_npls1eq[] =      "(n+1)!/(n+1)**(n+1))";
/* ---------------------------------- */
/* ---------------------------------- */
fd.h
/* ---------------------------------- */
/* save as fd.h                       */
/* ---------------------------------- */
double a_n(
double n)
{
        return(  1./(3.*n+2.) );
}
char a_neq[] =  "1/(3*n+2)";
/* ---------------------------------- */
double a_npls1(
double n)
{
        return(   1./(3.*(n+1.)+2.) );
}
char a_npls1eq[] = "1/(3*(n+1)+2))";
/* ---------------------------------- */
/* ---------------------------------- */