Progressões Aritméticas e Geométricas (PA e PG)
Publicado por Reginaldo de Matias 17/11/2006
[ Hits: 61.061 ]
Homepage: http://mundodacomputacaointegral.blogspot.com/
O presente programa apresenta a aplicação de Progressão Aritmética (PA) e Progressão Geométrica (PG) e efetua o e-nésimo termo e a soma dos termos do mesmo.
Mostra um menu de opções:
[1] PA
[2] PG
[3] Sair
Dados de entrada do usuário: primeiro termo, razão, n° de termos.
Dados de saída: o e-nésimo termo e a soma dos termos.
/*******************************************************************************
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");
}
Nenhum comentário foi encontrado.
Monitorando o Preço do Bitcoin ou sua Cripto Favorita em Tempo Real com um Widget Flutuante
IA Turbina o Desktop Linux enquanto distros renovam forças
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Como realizar um ataque de força bruta para desobrir senhas?
Como usar Gpaste no ambiente Cinnamon
Atualizando o Fedora 42 para 43
SQLITE não quer funcionar no LINUX LMDE6 64 com Lazaruz 4.2 64bit (n... (0)
Secure boot, artigo interessante, nada técnico. (5)
VOL já não é mais como antes? (9)
É normal não gostar de KDE? (13)
E aí? O Warsaw já está funcionando no Debian 13? [RESOLVIDO] (15)









