Progressões Aritméticas e Geométricas (PA e PG)
Publicado por Reginaldo de Matias 17/11/2006
[ Hits: 61.049 ]
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");
}
Criando um Quadrado com asteriscos
Nenhum comentário foi encontrado.
IA Turbina o Desktop Linux enquanto distros renovam forças
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Como instalar o repositório do DBeaver no Ubuntu
Como instalar o Plex Media Server no Ubuntu
Digitando underscore com "shift" + "barra de espaços"
Como ativar a lixeira e recuperar aquivos deletados em um servidor Linux
Como mudar o nome de dispositivos Bluetooth via linha de comando
Assinador JNLP do Site Portal da Nota Fiscal Eletrônica (4)
Warcraft II Remastered no Linux? (3)









