Miquéias Moreira

@Simon Viegas, acabei esquecendo de postar aqui o meu código refeito. Refiz o meu algoritmo tem uns dias e ficou certinho agora.

algoritmo "FIBONACCI"
var
limite, Cont, Termo1, Termo2, TermoNovo: Inteiro
inicio
      Escreval("=======================================")
      Escreval("|       SEQUÊNCIA FIBONACCI            |")
      Escreval("=======================================")
      Termo1 <- 0
      Termo2 <- 1
      Escreval("DIGITE O LIMITE DA SEQUÊNCIA: ")
      Leia(limite)
      Para Cont <- 1 ate limite faca
           TermoNovo <- Termo1 + Termo2
           Termo2 <- Termo1
           Termo1 <- TermoNovo
           Escreva(TermoNovo)
      FimPara
fimalgoritmo

@Simon Viegas Eu pedi para Escrever na Tela dois 1 e acabou não dando tão certo o que eu queria fazer, mas refiz aqui e ficou desse jeito que coloquei na imagem abaixo. Você pode me explica só o que você mencionou sobre colocar o Termo2 dentro do Termo1 e o TermoNovo dentro do Termo2? Essa parte eu me perdi um pouco.

@Simon Viegas, sei que já tem um bom tempo que vocês falaram sobre isso, mas estou iniciando agora algoritmos. Poderia me explicar porque você colocou Termo1 no Termo2 e Novotermo dentre do Termo2? A partir de novoTermo = Termo1 + Termo2 entendi tranquilo.

Meu algoritmo:

algoritmo "SEQUÊNCIAFIBONACCI"
var
   limite, Seq, Termo1, Termo2, TermoNovo: Inteiro
inicio
   Escreval("=======================================")
   Escreval("| SEQUÊNCIA FIBONACCI      |")
   Escreval("=======================================")
   Escreval("DIGITE A QUANTIDADE DE NÚMEROS QUE TERÃO NA SEQUÊNCIA:")
   Leia(limite)
   Termo1 <- 1
   Termo2 <- 1
   Escreva(Termo1,",")
   Escreva(Termo2,",")
   Enquanto limite >= Seq faca
      TermoNovo <- Termo1 + Termo2
      Escreva(TermoNovo,",")
      Termo1 <- Termo2
      Termo2 <- TermoNovo
      Seq <- Seq + 1
   FimEnquanto
fimalgoritmo

Ele tá funcionando, mas só queria entender essa parte que mencionei.