Aller au contenu

Mathc initiation/c34a4

Un livre de Wikilivres.


Sommaire


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


c00b.c
/* ---------------------------------- */
/* save as c00b.c                     */
/* ---------------------------------- */
#include "x_hfile.h"
#include      "fb.h"
/* ---------------------------------- */
int main(void)
{
 clrscrn();
 
 printf(" f : (x,y)-> %s\n\n", feq);
 printf(" v :   (y)-> %s  \n", veq);
 printf(" u :   (y)-> %s\n\n", ueq);
 printf(" b =    %+.1f\n a =    %+.1f\n\n\n",by,ay);

 printf(" Find the surface area for the given functions\n");
 printf(" with the simpson's rule.\n\n\n");
 printf("    (b     (v(y)\n");
 printf(" int(   int(     sqrt(f_x()**2 + f_y()**2 + 1)  dxdy = %.3f\n", 
                                             S_dxdy(f, u,v,LOOP, ay,by,LOOP));
 printf("    (a     (u(y)\n\n\n");

 printf("\n\n Press return to continue.\n");
 getchar();

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


Exemple de sortie écran :

 f : (x,y)-> x**2 + y

 u :   (y)-> 0  
 v :   (y)-> 1

 a = -1.0   b = +1.0 



 Find the surface area for the given functions
 with the simpson's rule.


    (b     (v(y)
 int(   int(     sqrt(f_x()**2 + f_y()**2 + 1)  dxdy = 3.596
    (a     (u(y)




 Press return to continue.


Exemple de sortie écran :

Verify with maple

> restart:
> 
> f := (x,y)->x^2+y:
> Int(
> Int(
> 
> sqrt( diff(f(x,y),x)^2 + diff(f(x,y),y)^2 + 1),
> 
> x = 0 .. 1),
> y = -1 .. 1);

                       1    1
                      /    /
                     |    |           2
                     |    |   sqrt(4 x  + 2) dx dy
                     |    |
                    /    /
                      -1   0

> evalf(value(%));
> 

                             3.595705578