Ciclo iterativo

   Escriba un programa para evaluar el coseno de X utilizando la serie de Taylor a cinco lugares decimales de exactitud.


#include<stdlib.h>
#include<stdio.h>
#include<math.h>

int main( void )
{

   /* Propósito : Coseno de X */
   /* Autor: Prof. Cabassa */

   double X_en_grados, X, N, Var1, Var2, Suma;

   printf( "Entre ángulo\n" );
   scanf ( "%lf", &X_en_grados );
   X = 3.141592653589793 * X_en_grados / 180.0;
   Suma = 1.0;
   N    = 1.0;

   Var1 = 1.0;
   Var2 = - pow( X, 2 ) / ( 2.0 * N * ( 2.0 * N - 1.0 ) ) * Var1;
   while ( ! ( fabs( Var2 - Var1 ) < 1.0E-5 ) )
   {
      Suma += Var2;
      N ++;
      Var1 = Var2;
      Var2 = - pow( X, 2 )  /  ( 2.0 * N * ( 2.0 * N - 1.0 ) ) * Var1;
   }

   printf( "Cos %lf = %lf\n", X_en_grados, Suma );

   return 0;

}


Última modificación : jueves 18 de junio de 1998

©Derechos Reservados - 1997 - Prof. H. D. A. Cabassa