algoritmo

[TCHE 0]

ola pessoal, estou com uma dulvida, tenho q resouver uma querstão sobre Pa( Progressao Aritimetica) é o seguinte:

 

01- Leia a razão de uma PA (Progressão Aritmética) e o seu primeiro e último termos e

informe a soma dos elementos dessa PA.

 

o problema é que, não sei se meu algoritmo responde essa pergunta? necessito de ajuda.

a formula de uma pa é an = a1 (n - 1) * r

 

 

CODE

var

an, a1, n, r , i : real

inicio

escreva ("entre como valor de an: ")

leia (an)

escreva ("entre como valor de a1: ")

leia (a1)

escreva ("entre como valor de n: ")

leia (n)

i := 1

r := (a1 + (n - i )) / an

escreva ( r )

 

também fiz desse jeito

 

CODE

var

an, a1, n, r , i : real

resultado : real

inicio

escreva ("entre com o valor de an: ")

leia (an)

escreva ("entre com o valor de a1: ")

leia (a1)

escreva ("entre com o valor de a: ")

leia (n)

escreva ("entre com o valor de r: ")

leia ®

i := 1

resultado := a1 + (n - i) * r

resultado := resultado / an

escreva (resultado)

[quitZAUMMM 18]

antes de passar para o Portugol você sabe a forma matematica de c fazer td isso?

 

Olha pra te dar uma luz você pode fazer algo do tipo:

Enquanto (num_pa <> ult_num_pa) faça
soma = soma + num_pa
.
.
.
Fim_enquanto

Entenda assim: você vai dar o primeiro elemento, o ultimo e a razão da PA.

ai como você tem a formula você vai saber ql o intervalo da PA..

ai enquanto o numero da PA for diferente do ultimo numero acrescenta td na variavel soma.. qnd for igual sai do laço,

e adiciona o ultimo valor na soma!!

sei q fico meio confuso + volte a postar c tiver duvidas!! :D

[TCHE 0]

velho na verdade num entendi nada?

mais vamos la eu li novamente sobre a pa e tinha uma resposta desse jeito

 

7 8 5 4 1 6 3 9 8 7 9 5

 

7+ 5 = 12

8 + 9 = 17

5 + 7 = 12

4 + 8 = 12

1+9 = 10

6+3 = 9

 

=72

 

junta o primeiro com o ultimo e calcular

[Kandrade 7]

Isso pode te ajudar também:

 

http://forum.imasters.com.br/index.php?showtopic=249982

http://forum.imasters.com.br/index.php?showtopic=257106

[quitZAUMMM 18]

TCHE ql a razão no seu exemplo acima? :s

 

veja e estude o material q o Kandrade disponibilizou, qlqr duvida volte a postar!

[Kandrade 7]

Não tinha lido todo seu tópico.

O que voce precisa é simples.

Primeiro compreenda o conceito matemático.

 

Soma de n termos de uma PA: n * (a1 + an) / 2

 

n é a quantidade de termos

a1 primeiro elemento

an último elemento

 

Falta só calcular o n, pois os outros valores são lidos.

Tente isso.

 

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[TCHE 0]

se é pra calcular n, entao o algrotmo vai ser o mesmo

q esta nesse topico

 

http://forum.imasters.com.br/index.php?showtopic=257106

[Kandrade 7]

Não, esse algoritmo mostra toda a PA, o que voce precisa é calcular a soma dos termos.

Use a fórmula que te passei.

 

n é o número de termos de uma PA.

an = a1 + (n - 1) * r

 

Essa é a fórmula, basta isolar o n

 

 

se é pra calcular n, entao o algrotmo vai ser o mesmo

q esta nesse topico

 

http://forum.imasters.com.br/index.php?showtopic=257106

[TCHE 0]

pelo meu entender seria + ou - assim?

 

 

CODE

var

n : real

i, a1, an : inteiro

inicio

escreva ("entre com o calor de a1: ")

leia (a1)

escreva ("entre com o calor de an: ")

leia (an)

i := 2

n := (a1 + an) /i

escreva (n)

fimalgoritmo

[quitZAUMMM 18]

pelo q entendi o exercicio pedi a razão e você naum fez isso no algoritmo acima..

e uma dica c você for fazer i valer 2 o algoritmo inteiro nem precisa usá-la coloque 2 direto!!

 

volte a postar xD

[TCHE 0]

se ele pedi a rapaz entao observe a primeira resposta, pois ali esta resouvendo a razao

[quitZAUMMM 18]

na sua primeira resposta você esta lendo o 'n' numero de termos, jah no algoritmo para fazer a somo você tem q descobrir o 'n'

[TCHE 0]

primeiramente eu entendi as dicas, mais ñ estava conseguindo transformar em algoritmo mais creio eu q conseguir, eu fui auterando os valores de an, a1, r e foi dando o mesmo valor dos questões consegui resouver fora de algoritmo mais observa ai

CODE

var

b, n : real

an, a1, i, r : inteiro

inicio

escreva ("entre com o valor de an: ")

leia (an)

escreva ("entre com o valor de a1: ")

leia (a1)

escreva ("entre com o valor de r: ")

leia ®

i := 1 * r

n := 1 * r

b := an + a1 + i

n := b / n

escreva ("valor de n: ", n)

fimalgoritmo

no caso ( n - 1).r seria o r *n e 1 * r isso q ainda ñ esta compreendeondo

[quitZAUMMM 18]

tipo seu algoritmo qr a soma de tds os elementos resultantes da PA e naum ql o numero de termos.. pense melhor..

e pra q fazer [1 * r] num é mais facil colocar o 'r' direto??

[TCHE 0]

eu tambem poderia tira ( n := 1 * r ) e no lugar de ( n := b / n ) eu poderia colocar assim (n := b / i) pq o mesmo valor multiplicado por n vai ser o mesmo multiplicado 1

r = 5

explo (n - 1)r

(5n - 5)

 

é verdade colocaria o r i pronta tiraria o i valeu mais o meu algoritmo aida esta errado

[quitZAUMMM 18]

TCHE, no q o exercicio pede, pense assim..

digamos q a primeiro numero seja '3', o ultimo numero seja '15' e a razão '3'

oq você tem q fazer??

calcular a soma deles e do intervalo q a neles pela razão q foi dada!!

[quitZAUMMM 18]

olha TCHE pensei em algo do tipo:

soma <- soma + 1num_pa;	  //soma vai receber o valor do primeiro numero da PA
num_pa <- 1num_pa;	 //num_pa vai receber o primeiro numero da PA pra poder iniciar o loop
Enquanto (num_pa <> ult_num_pa) faça	//tipo enquanto o numero da PA for diferente do ultimo 
   num_pa <- num_pa + razao;	 //num_pa sempre sera incrementado com ele msm + a razao
   soma <- soma + num_pa;		//e soma sera sempre acumulada
Fim_enquanto; //qnd o num_pa for igual a ult_num_pa(ultimo numero da PA) o loop finaliza
Escreva ("Soma dos numeros da PA é de: " + soma);   //ai você escreve a soma deles

[TCHE 0]

nossa eu pensei q é apenas pra resouver

tipo assim

 

an = a1 + (n - 1) * r

15 = 3 + (n - 1) * 3

15 = 3 +(3n - 3)

15 -3 + 3 = 3n

15 = 3n

n = -15/3

n= -5

[quitZAUMMM 18]

assim tche você pode até achar 'n' numeros primos + precisa somá-los observe q no algoritmo q te passei é soh você usar uma variavel contador no loop q você saberá qnts tem;;; porem você qria a soma certo??? veja c o algoritmo era oq você precisava! oq você naum entender nele fique a vontade para tirar duvidas..

 

[]'s

[TCHE 0]

eu acho q terei q volta a estudar as vogais, to me esforçando pra carambo e ñ to obtendo resultado, ta complicado mas, vo disistir ñ, eu apenas coloquei as variaveis no seu algoritmo e assim ainda ñ sei se esta certo

 

 

CODE

razao, numpa1, ult_num_pa : real

soma, num_pa: real

inicio

escreva ("entre com a razao: ")

leia (razao)

escreva ("entre com a num_pa1: ")

leia (numpa1)

escreva ("entre com a ult_num_pa: ")

leia (ult_num_pa)

soma <- soma + numpa;

num_pa <- numpa1;

Enquanto (num_pa <> ult_num_pa) faca

num_pa <- num_pa + razao;

soma <- soma + num_pa;

Fimenquanto

Escreva ("Soma dos numeros da PA é de: ", soma)

fimalgoritmo

 

eu acho q terei q volta a estudar as vogais, to me esforçando pra carambo e ñ to obtendo resultado, ta complicado mas, vo disistir ñ, eu apenas coloquei as variaveis no seu algoritmo e assim ainda ñ sei se esta certo

 

 

CODE

var

razao, numpa1, ult_num_pa : real

soma, num_pa: real

inicio

escreva ("entre com a razao: ")

leia (razao)

escreva ("entre com a num_pa1: ")

leia (numpa1)

escreva ("entre com a ult_num_pa: ")

leia (ult_num_pa)

soma <- soma + numpa;

num_pa <- numpa1;

Enquanto (num_pa <> ult_num_pa) faca

num_pa <- num_pa + razao;

soma <- soma + num_pa;

Fimenquanto

Escreva ("Soma dos numeros da PA é de: ", soma)

fimalgoritmo