Mathc initiation/a503

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( pow(-1.,n)*(n*n+4)/pow(2.,n) ); } char a_neq[] = "(-1)**n * (n**2 +4)/ 2**n"; /* ---------------------------------- */ double a_npls1( double n) { return( pow(-1.,n)*((n+1)*(n+1)+4)/pow(2.,(n+1)) ); } char a_npls1eq[] = "(-1)**n * ((n+1)**2+4)/ 2**(n+1)"; /* ---------------------------------- */ /* ---------------------------------- */

fb.h /* ---------------------------------- */ /* save as fb.h */ /* ---------------------------------- */ double a_n( double n) { return( pow(-1.,n)*pow(3,n)/factorial(2.*n) ); } char a_neq[] = "(-1)**n * 3**n/ (2*n)!"; /* ---------------------------------- */ double a_npls1( double n) { return( pow(-1.,n)*pow(3,(n+1))/factorial((2.*(n+1))) ); } char a_npls1eq[] = "(-1)**n * 3**(n+1)/(2*(n+1))!"; /* ---------------------------------- */ /* ---------------------------------- */

fc.h /* ---------------------------------- */ /* save as fc.h */ /* ---------------------------------- */ double a_n( double n) { return( pow(-1.,n)*factorial(n-3)/pow(8,n) ); } char a_neq[] = "(-1)**n * (n -3)!/ 8**n"; /* ---------------------------------- */ double a_npls1( double n) { return( pow(-1.,n)*factorial((n+1)-3)/pow(8,(n+1)) ); } char a_npls1eq[] = "(-1)**n * ((n+1)-3)!/ 8**(n+1)"; /* ---------------------------------- */ /* ---------------------------------- */

---