Progressões Aritméticas e Geométricas (PA e PG)
Publicado por Reginaldo de Matias 17/11/2006
[ Hits: 61.164 ]
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");
}
Cálculo da circunferência de um círculo
Verificador de senhas: comparando palavras
Nenhum comentário foi encontrado.
Gentoo: detectando impressoras de rede e como fixar uma impressora por IP
Como o GNOME conseguiu o feito de ser preterido por outras interfaces gráficas
Gentoo binário em 2026: UEFI, LUKS, Btrfs e Systemd
Trabalhando Nativamente com Logs no Linux
Jogando Daikatana (Steam) com Patch 1.3 via Luxtorpeda no Linux
Por que sua empresa precisa de uma PKI (e como automatizar EMISSÕES de certificados via Web API)
Instalando NoMachine no Gentoo com Systemd (acesso Remoto em LAN)
Gentoo: Trocando wpa_supplicant pelo iwd no NetworkManager (Systemd)
O que houve com slackware ??? (12)
Alterar conteúdo de dica [RESOLVIDO] (3)
Vou destruir sua infância:) (5)









