49037831 Algoritmos C

874 palavras 4 páginas
/*******************************************************************************
Autor: Reginaldo de Matias
E-mail: reginaldo.matias@gmail.com
Programa: Progressão Aritmética - PA
Progressão Geométrica - PG
*******************************************************************************/
#include <stdio.h>
#include <stdlib.h>
#include <math.h> int main()
{
float a1,r,an,Sn,q; int op,n; do{ system("color 9A"); printf("[1]Progressao Aritmetica - PA\n"); printf("[2]Progressoa Geometrica - PG\n"); printf("[3]Sair\nEscolha sua opcao: "); scanf("%i",&op); switch(op)
{
case 1: printf("\tProgressao Aritmetica - PA\n"); printf("\nEntre com o valor do primeiro termo: "); scanf("%f",&a1); printf("\nEntre com o valor da razao: "); do{ scanf("%f",&r);
}while(r==0);
printf("\nNumero de termos: "); do{ scanf("%i",&n);
}while(n<=0);
an = (a1 + (n - 1) * r);
Sn = (a1 + an)/2; printf("\n\nE-nesimo termo da P.A. - an: %f\n\n",an); printf("A Soma do termos da P.A. - Sn: %f\n\n",Sn); break; case 2: printf("\tProgressao Geometrica - PG\n"); printf("\nEntre com o valor do primeiro termo: "); scanf("%f",&a1); printf("\nEntre com o valor da razao: "); do{ scanf("%f",&q);
}while(q==0);
printf("\nNumero de termos: "); do{ scanf("%i",&n);
}while(n<=0);
an = (a1 * pow(q,n-1));
Sn = ((a1*(pow(q,n) - 1))/(q-1)); printf("\nE-nesimo termo da P.G. - an: %f\n\n",an); printf("A Soma do termos da P.G. finita - Sn: %f\n\n",Sn); break; }
}while(op != 3); system("Pause"); }

//FATORIAL DE 6// include<stdio.h> int main( ){ int aux=6; fat=1; //fat não pode começar com zero while(aux>0) { fat = fat * aux; aux = aux - 1;
} //fim do while printf("%d", fat); //vai imprimir na tela o resultado endwin( );
} //fim do main
/*no primeiro loop, fat faz 6 * 1, depois, 6 * 5, depois 30 * 4, depois 120 * 3, depois 360 * 2, depois 720 * 1 e depois termina.
Quando aux for zero, ele sai do loop while
*/
////É MAIS OU MENOS ASSIM A LÓGICA. COPIE E COLE ESSE CÓDIGO E NA HORA DE COMPILAR, CORRIJA OS
ERROS, SE HOUVER.
Crie um

Relacionados