Progressões Aritméticas e Geométricas (PA e PG)
Publicado por Reginaldo de Matias 17/11/2006
[ Hits: 61.151 ]
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");
}
Números primos da seqüência Fibonacci
Nenhum comentário foi encontrado.
LazyDocker – Interface de Usuário em Tempo Real para o Docker
Instalando COSMIC no Linux Mint
Turbinando o Linux Mint: o poder das Nemo Actions
Inteligência Artificial no desenvolvimento de software: quando começar a usar?
O widget do Plasma 6 Área de Notificação
[Resolvido] Algo deu errado ao abrir seu perfil
Quando vocês pararam de testar distros? (14)
Problema com som no laptop (3)
Não estou conseguindo fazer funcionar meu Postfix na versão 2.4 no Deb... (2)









