Jump to content
Super.D

Sucessão por recorrência

Recommended Posts

Super.D

Bom imaginando o seguinte:

[1ª Figura]
1

[2ª Figura]
3

[3ª Figura]
6

[4ª Figura]
10

[5ª Figura]
15

...
-> pontos.

Sucessão por recorrência define-se em: Para definir o termo de ordem n de uma sucessão se recorre à relação com termos anteriores à sua ordem de sequência.

Vamos imaginar que queríamos calcular quantos pontos tinha a 6ª figura, então: Tn = n + Tn-1.

Para a sexta figura Tn-1 é o termo anterior ao termo n. n = 6, então Tn-1 = 15.

Tn = n + Tn-1 <=> 6 + 15 <=> Tn = 21 -> T6 = 21.

Porque não fazer de uma forma mais simplificada?

program sequencia;
uses crt;
var
  tn, n, tnm1 : integer;

begin
 repeat
	   writeln('Calculo de sucessão por recorrencia...');
	   writeln('Digite a ordem n');
	   readln(n);
	   writeln('Digite o termo anterior (tn-1), ou seja, o termo anterior ao termo de ordem n');
	   readln(tnm1);
	   tn := n + tnm1;
	   writeln('O termo seguinte e: ', tn);
	   readkey;
 until (n >= 1);
end.

Para o primeiro programa em pascal não está nada mau :)

Edited by Super.D

Share this post


Link to post
Share on other sites
thoga31

A sequência não deve começar em 1? É que esse programa não é mais do que uma forma pomposa de fazer "A+B". Pedes N e pedes TNM1, e soma-los. Como sabe o utilizador o elemento TNM1? Inventa um nº qualquer...

Aqui o verdadeiro desafio seria começar a sequência em 1 e obter o nº elemento.


Knowledge is free!

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.