Progressões Aritméticas e Geométricas (PA e PG)
Publicado por Reginaldo de Matias 17/11/2006
[ Hits: 60.932 ]
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"); }
Ordenando linhas e colunas de matrizes
Divisores de n no intervalo [a,b]
Nenhum coment�rio foi encontrado.
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
O macete do Warsaw no Linux Mint e cia
Um modo leve de ouvir/ver áudio/vídeo da internet em máquinas pererecas
Resolver algumas mensagens de erro do SSH
Instalar módulo de segurança do Banco do Brasil Warsaw do tipo .run
Sem espaço na partição home (2)
O que você está ouvindo agora? [2] (190)
Procrastinação e autossabotagem são problemas muito comuns na sociedad... (5)