fibonati em visual g

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

algoritmo "semnome"
// Função :
// Autor :
// Data : 04/04/2018
// Seção de Declarações 
var
 num1,num0,n0,n1,n2,n3:inteiro
inicio
num0<-0
num1<-1
repita //1,1,2,|3,5,8,|13,21,34,|55,89,134//
n1<-num0+num1
n2<-n1+num0
N3<-n1+n2
num0<-n3
num1<-n2
escreva(n1," +",n2," +",n3)
fimrepita
fimalgoritmo