Determinación de Series de Constantes y de Taylor en c y c++

   1  #include <stdio.h>

   2  

   3  double pi;

   4  

1. void S1(long long int n);
2. void S2(long long int n, int k);
3. void S3(long long int n);
4. void S4(long long int n);
5. void S5(long long int n);
6. void S6(long long int n);
7. void S7(long long int n, double x, int k, double sen);
8. void S8(long long int n, double x);
9. void S9(long long int n, double x);
10. void S10(long long int n, double x);
11. void S11y31(long long int n, double x, int k);
12. void S12(long long int n, double x);
13. void S13y15(long long int n, double x, double a, int k);
14. void S14(long long int n, double x);
15. void S16(long long int n, int k);
16. void S17(long long int n, int k, int m);
17. void S18(long long int k, int a);
18. void S19(long long int n, double x, int m, int o);
19. void S20(long long int n, double x, int m);
20. void S21(long long int n, double x, int m);
21. void S22(long long int n, double x, int m);
22. void S23(long long int n, double x, int u);
23. void S24y25(long long int n, double x, int k, int m);
24. void S26(long long int n, double x, int m, int k);
25. void S27(long long int n, double x);
26. void S28(long long int n, double x);
27. void S29(long long int n, double x);
28. void S30(long long int n, double x);
29. void S32(long long int n, double x);

  34  

1. int main()
2. {
3. printf("P1: Determinacion de Series de Constantes y de Taylor\n");
4. printf("Programa hecho por: \n");
5. printf("Nombre                                       NUA\n");
6. printf("Eduardo Arath Zuniga Bermudez                393152\n");
7. printf("Francisco De Jesus Martinez Gonzalez         462801\n");
8. printf("Ximena Berenice Guzman Gonzalez              147745\n\n");
9. system("pause");
10. char t = ' ';
11. int m, k=0, k2=0, k3=0, n2, o, y;  46      long long unsigned int n;  

  47      double x, a;   48      RETURN:

1. do
2. {
3. system("cls");
4. printf("Elige una Serie: \n\n");  53          printf("Series de Constantes                                     Funciones trigonometricas\n");   54          printf("1) ln(2)                                                 19) sen(x)\n");   55          printf("2) pi/4                                                  20) cos(x)\n");   56          printf("3) pi^2/6                                                21) tan(x)\n");   57          printf("4) pi^2/8                                                22) sec(x)\n");   58          printf("5) 1/2                                                   23) csc(x)\n");   59          printf("6) 3/4                                                   24) sen^-1(x)\n");

  60          printf("                                                         25) cos^-1(x)\n");   61          printf("Funciones logaritmicas y exponenciales                   26) tan^-1(x)\n");   62          printf("7) e^x\n");   63          printf("8) xe^x                                                  Funciones hiperbolicas\n");   64          printf("9) (x + x^2)e^x                                          27) sinh(x)\n");   65          printf("10) ln(1 + x)                                            28) cosh(x)\n");   66          printf("11) 1/2 ln[(1 + x)/(1 - x)]                              29) tanh(x)\n");   67          printf("12) ln(x) Metodo 1                                       30) senh^-1(x)\n");   68          printf("13) ln(x) Metodo 2                                       31) tan^-1(x)\n");   69          printf("14) (1 + x)^a\n");   70          printf("15) a^x                                                  Series varias\n");   71          printf("                                                         32)

[ln(1+x)]/(1+x)\n");   72          printf("Numeros de Bernoulli y de Euler                          33) e^sen(x)\n");   73          printf("16) Numeros de Bernoulli\n");

1. printf("17) Numeros de Euler\n");
2. printf("18) Numeros de Euler de k valores pares\n\n");
3. scanf("\n%d",&y);
4. }
5. while(y<1||y>33);
6. if(y==17||y>=19&&y<=26||y==33)
7. S2(100000000, 1);  81      RETURNb:

1. switch(y)
2. {  84          case 1:

1. {
2. do
3. {
4. system("cls");
5. printf("ln(2) = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. }
8. while(n<1||n>1000000000000000000);
9. system("cls");
10. S1(n);
11. break;
12. }
13.   98          case 2:

1. {
2. do
3. {
4. system("cls");
5. printf("pi/4 = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. }
8. while(n<1||n>1000000000000000000);
9. system("cls");
10. S2(n, 0);
11. break;
12. }
13.  112          case 3:

1. {
2. do
3. {
4. system("cls");
5. printf("pi^2/6 = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. }
8. while(n<1||n>1000000000000000000);
9. system("cls");
10. S3(n);
11. break;
12. }
13.  126          case 4:

1. {
2. do
3. {
4. system("cls");
5. printf("pi^2/8 = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. }
8. while(n<1||n>1000000000000000000);
9. system("cls");
10. S4(n);
11. break;
12. }
13.  140          case 5:

1. {
2. do
3. {
4. system("cls");
5. printf("1/2 = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. }
8. while(n<1||n>1000000000000000000);
9. system("cls");
10. S5(n);
11. break;
12. }
13.  154          case 6:

1. {
2. do
3. {
4. system("cls");
5. printf("3/4 = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. }
8. while(n<1||n>1000000000000000000);
9. system("cls");
10. S6(n);
11. break;
12. }
13.  168          case 7:

1. {
2. do
3. {
4. system("cls");
5. printf("e^x = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. printf("\nIngrese el valor de x: ");
8. scanf("%lf", &x);
9. } 178             while(n<1||n>1000000000000000000||x<-1000000000000000000||x>1000000000000000000);

1. system("cls");
2. S7(n,x,0,0);
3. break;
4. }
5.  184          case 8:

1. {
2. do
3. {
4. system("cls");
5. printf("xe^x = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. printf("\nIngrese el valor de x: ");
8. scanf("%lf", &x);
9. } 194             while(n<1||n>1000000000000000000||x<-1000000000000000000||x>1000000000000000000);  195              system("cls");

1. S8(n,x);
2. break;
3. }
4.  200          case 9:

1. {
2. do
3. {
4. system("cls");
5. printf("(x + x^2)e^x = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. printf("\nIngrese el valor de x: ");
8. scanf("%lf", &x);
9. } 210             while(n<1||n>1000000000000000000||x<-1000000000000000000||x>1000000000000000000);  211              system("cls");

1. S9(n,x);
2. break;
3. }
4.  216          case 10:

1. {
2. do
3. {
4. system("cls");
5. printf("ln(1 + x) = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n); 223                  printf("\nIngrese el valor de x (x solo admite valores en el rango

(-1,1]): ");

1. scanf("%lf", &x);
2. } 226              while(n<1||n>1000000000000000000||x<=-1||x>1);

1. system("cls");
2. S10(n,x);
3. break;
4. }
5.  232          case 11:

1. {
2. do
3. {
4. system("cls"); 237                  printf("1/2 ln[(1 + x)/(1 - x)] = ?\n\nIngrese el numero de terminos: ");  238                  scanf("%d", &n);

1. printf("\nIngrese el valor de x (x solo admite valores en el rango

(-1,1)): ");

1. scanf("%lf", &x);
2. }
3. while(n<1||n>1000000000000000000||x<=-1||x>=1);
4. system("cls");
5. S11y31(n,x,0);
6. break;
7. }
8.  248          case 12:

1. {
2. do
3. {
4. system("cls");
5. printf("ln(x) = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. printf("\nIngrese el valor de x (x solo admite valores mayores de

0): ");

1. scanf("%lf", &x);
2. }
3. while(n<1||n>1000000000000000000||x<=0);
4. system("cls");
5. S12(n,x);
6. break;
7. }
8.  264          case 13:

1. {
2. do
3. {
4. system("cls");
5. printf("ln(x) = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. printf("\nIngrese el valor de x (x solo admite valores a partir de

0.5): ");

1. scanf("%lf", &x);
2. }
3. while(n<1||n>1000000000000000000||x<0.5);
4. system("cls");
5. k=0;
6. S13y15(n,x,a,k);
7. break;
8. }
9.  281          case 14:

1. {
2. do
3. {
4. system("cls"); 286                  printf("(1 + x)^a\n\nIngrese el valor de x (x solo esta en el rango de (-1,1)): ");  287                  scanf("%lf", &x);

1. printf("\nIngrese el valor de a: ");
2. scanf("%d", &n);
3. }
4. while(n<0||n>1000000000000000000||x<=-1||x>=1);
5. system("cls");
6. S14(n,x);
7. break;
8. }
9.  297          case 15:

1. {
2. do
3. {
4. system("cls");
5. printf("a^x = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. printf("\nIngrese el valor de a: ");
8. scanf("%lf", &a);
9. printf("\nIngrese el valor de x: ");
10. scanf("%lf", &x);
11. }
12. while(n<0||n>1000000000000000000);
13. system("cls");
14. k=1;
15. S13y15(n,a,x,k);
16. break;
17. }
18.  316          case 16:

1. {
2. do
3. {
4. system("cls"); 321                  printf("Bk = ?\n\nQue quieres ver?\n1) 1 numero de Bernoulli\n2) k numeros de Bernoulli\n3) k numeros de Bernoulli mayores a 0\n4) k par numeros de Bernoulli\n\n");

1. scanf("%d", &k);
2. }
3. while((k<1)||(k>4));
4. switch(k)
5. { 327                  case 1:

1. {
2. do
3. {
4. system("cls"); 332                          printf("Bk = ?\n\nIngrese el numero de Bernoulli que quieres ver: ");  333                          scanf("%d", &n);

1. k=0;
2. system("cls");
3. S16(n,k);
4. }
5. while(n<0||n>1000000000000000000);
6. break;
7. }
8.  342                  case 2:

1. {
2. do
3. {
4. system("cls"); 347                          printf("Bk = ?\n\nIngrese los numeros de Bernoulli que quieres ver: ");  348                          scanf("%d", &n);

1. k=1;
2. system("cls");
3. S16(n,k);
4. }
5. while(n<0||n>1000000000000000000);
6. break;
7. }
8.  357                  case 3:

1. {
2. do
3. {
4. system("cls"); 362                          printf("Bk = ?\n\nIngrese los numeros de Bernoulli que quieres ver: ");  363                          scanf("%d", &n);

1. n=n*2-3;
2. k=2;
3. system("cls");
4. S16(n,k);
5. }
6. while(n<0||n>1000000000000000000);
7. break;
8. }
9.  373                  case 4:

1. {
2. do
3. {
4. system("cls"); 378                          printf("Bk = ?\n\nIngrese los numeros de Bernoulli que quieres ver: ");  379                          scanf("%d", &n);

1. n=n*2-1;
2. k=3;
3. system("cls");
4. S16(n,k);
5. }
6. while(n<0||n>1000000000000000000);
7. break;
8. }
9. }
10. break;
11. }
12.  392          case 17:

1. {
2. do
3. {
4. system("cls"); 397                  printf("Ek = ?\n\nQue quieres ver?\n1) 1 numero de Euler\n2) k numeros de Euler\n3) k numeros de Euler mayores a 0\n\n");  398                  scanf("%d", &m);

1. }
2. while((m<1)||(m>3));
3. switch(m)
4. { 403                  case 1:

1. {
2. do
3. {
4. system("cls"); 408                          printf("Ek = ?\n\nIngrese el numero de Euler que quieres ver: ");  409                          scanf("%d", &k);

1. if(k%2!=0)
2. {
3. system("cls"); 413                              printf("Espere por favor mientras admiramos su inteligencia :D...");  414                              S17(0, k, 0);

1. }
2. else
3. {
4. printf("\nIngrese el numero de terminos: ");
5. scanf("%d", &n);
6. system("cls");
7. S17(n, k, 0);
8. }
9. }
10. while(n<0||n>1000000000000000000||k<0||k>1000000000000000000);
11. break;
12. }
13.  428                  case 2:

1. {
2. do
3. {
4. system("cls");
5. printf("Ek = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. printf("\nIngrese los numeros de Euler que quieres ver: ");
8. scanf("%d", &k);
9. system("cls");
10. printf("Espere por favor mientras admiramos su inteligencia

:D...");

1. S17(n, k, 1);
2. }
3. while(n<0||n>1000000000000000000||k<0||k>1000000000000000000);
4. break;
5. }
6.  445                  case 3:

1. {
2. do
3. {
4. system("cls");
5. printf("Ek = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. printf("\nIngrese los numeros de Euler que quieres ver: ");
8. scanf("%d", &k);
9. k=(k*2)-1;
10. m=2;
11. k2=1;
12. n2=1000000000;
13. system("cls");
14. printf("Espere por favor mientras admiramos su inteligencia

:D...");

1. S17(n, k, 2);
2. }
3. while(n<0||n>1000000000000000000||k<0||k>1000000000000000000);
4. break;
5. }
6. }
7. break;
8. }
9.  469          case 18:

1. {
2. do
3. {
4. system("cls"); 474                  printf("E2k = ?\n\nQue quieres ver?\n1) 1 numero de Euler\n2) k numeros de Euler\n\n");  475                  scanf("%d", &m);

1. }
2. while((m<1)||(m>2));
3. switch(m)
4. { 480                  case 1:

1. {
2. do
3. {
4. k2=2; 485                          RETURN18:

 486                          system("cls");  487                          printf("Ek = ?\n\nIngrese el numero de Euler que quieres ver (solo numeros pares): ");

1. scanf("%d", &k);
2. }
3. while(k<0||k>1000000000000000000);
4. if(k%2==0)
5. {
6. system("cls");
7. S18(k, 0);
8. }
9. else
10. {
11. if(k2>0)
12. {
13. k2--;
14. system("cls"); 502                              printf("Te dije que solo numeros pares\nVuelve a intentarlo\n\n");  503                              system("pause");

1. goto RETURN18;
2. }
3. else
4. {
5. system("cls"); 509                              printf("No entendiste que solo numeros pares? >:(\nYa no tienes intentos, ya me enoje >:(\n\n");  510                              system("pause");

1. }
2. }  
3. break;
4. }
5.  516                  case 2:

1. {
2. do
3. {
4. system("cls");
5. printf("Ingrese los numeros de Euler que quieres ver: ");
6. scanf("%d", &k);
7. }
8. while(k<0||k>1000000000000000000);
9. system("cls");
10. S18(k, 1);
11. break;
12. }
13. }
14. break;
15. }
16.  533          case 19:

1. {
2. do
3. {
4. system("cls");
5. printf("sen(x) = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. }
8. while(n<1||n>1000000000000000000);
9. do
10. {
11. printf("\nQue tipo de valor quieres usar?\n1) Grados\n2)

Radianes\n\n");

1. scanf("%d", &m);
2. }
3. while(m<1||m>2);

 548              

1. switch(m)
2. { 551                  case 1:  552                  {

1. system("cls");
2. printf("sen(x) = ?\n\nIntroduce tu valor de x en grados: ");
3. scanf("%lf", &x);
4. system("cls");
5. S19(n, pi*x/180, 0, 0);
6. break;
7. }
8.  561                  case 2:

1. {
2. do
3. {
4. system("cls");
5. printf("sen(x) = ?\n\nValor en radianes\n");
6. printf("1) pi/4\n2) pi/2\n3) 3pi/4\n4) pi\n5) 5pi/4\n6)

3pi/2\n7) 7pi/4\n8) 2pi\n9) Otro valor\n\n");

1. scanf("%d", &m);
2. }
3. while(m<1||m>9);
4. switch(m)
5. { 573                          case 1:

1. {
2. system("cls");
3. printf("Espere por favor, fuimos a la playa ;)...");
4. S19(n, pi/4, 1, 0);
5. break;
6. }
7.  581                          case 2:

1. {
2. system("cls");
3. printf("Espere por favor, fuimos a la playa ;)...");
4. S19(n, pi/2, 1, 0);
5. break;
6. }
7.  589                          case 3:

1. {
2. system("cls");
3. printf("Espere por favor, fuimos a la playa ;)...");
4. S19(n, pi*3/4, 1, 0);
5. break;
6. }
7.  597                          case 4:

1. {
2. system("cls"); 600                              printf("Espere por favor, fuimos a la playa ;)...");

1. S19(n, pi, 1, 0);
2. break;
3. }
4.  605                          case 5:

1. {
2. system("cls");
3. printf("Espere por favor, fuimos a la playa ;)...");
4. S19(n, pi*5/4, 1, 0);
5. break;
6. }
7.  613                          case 6:

1. {
2. system("cls");
3. printf("Espere por favor, fuimos a la playa ;)..."); 617                              S19(n, pi*3/2, 1, 0);

1. break;
2. }
3.  621                          case 7:

1. {
2. system("cls");
3. printf("Espere por favor, fuimos a la playa ;)...");
4. S19(n, pi*7/4, 1, 0);
5. break;
6. }
7.  629                          case 8:

1. {
2. system("cls");
3. printf("Espere por favor, fuimos a la playa ;)...");
4. S19(n, pi*2, 1, 0);
5. break;
6. }
7.  637                          case 9:

1. {
2. system("cls"); 640                              printf("sen(x) = ?\n\nIntroduce el valor de x en radianes: ");  641                              scanf("%lf",&x);

1. system("cls");
2. printf("Espere por favor, fuimos a la playa ;)...");
3. S19(n, x, 1, 0);
4. break;
5. }
6. }
7. break;
8. }
9. }
10. break;
11. }
12.  654          case 20:

1. {
2. do
3. {
4. system("cls");
5. printf("cos(x) = ?\n\nIngrese el numero de terminos: ");
6. scanf("%d", &n);
7. } 662              while(n<1||n>1000000000000000000);

1. do
2. { 665                  printf("\nQue tipo de valor quieres usar?\n1) Grados\n2)

Radianes\n\n");

1. scanf("%d", &m);
2. }
3. while(m<1||m>2);

 669              

1. switch(m)
2. { 672                  case 1:

1. {
2. system("cls");
3. printf("cos(x) = ?\n\nIntroduce tu valor de x en grados: ");
4. scanf("%lf", &x);
5. system("cls"); 678                      printf("Espere por favor... Emmmm... Quien es la niña que esta detras de usted? :O...");

1. S20(n, pi*x/180, 0);
2. break;
3. }
4.  683                  case 2:

1. {
2. do
3. {
4. system("cls");
5. printf("cos(x) = ?\n\nValor en radianes\n");
6. printf("1) pi/4\n2) pi/2\n3) 3pi/4\n4) pi\n5) 5pi/4\n6)

3pi/2\n7) 7pi/4\n8) 2pi\n9) Otro valor\n\n");

...