Aller au contenu

Mathc initiation/Fichiers c : c77cp

Un livre de Wikilivres.


Sommaire


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

c1p.c
/* --------------------------------- */
/* save as c1p.c                     */
/* --------------------------------- */
#include "x_hfile.h"
#include      "fp.h"
/* --------------------------------- */
int main(void)
{
double x  = 1.8;

 clrscrn();
 
 printf("  x =  %0.1f   \n\n\n",x);
 
 printf("  %s \t\t= %0.8f\n",    f1eq, f1(x));
 printf("  %s \t= %0.8f\n\n\n",  f2eq, f2(x));
 

 stop();

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


Vérifions par le calcul :
  x =  1.8   


  cos(x/2.) 		    = 0.62160997
  sqrt((1+cos(x))/2.) 	= 0.62160997


 Press return to continue.


Vérifions les égalités :
    Nous avons vu que :
    
    cos(2*X) = 2*cos(X)**2 - 1    
    
    posons X = (x/2)
                                                            
    cos(2*(x/2)) = 2*cos(x/2)**2 - 1 
    
          cos(x) = 2*cos(x/2)**2 - 1 
       
     cos(x/2)**2 = (1 + cos(x)) / 2      
     
    soit
    
       cos(x/2) = sqrt((1 + cos(x)) / 2)