{ Calcul et affichage des nombres de Fibonacci }

action principale()
  Locales n : entier            { le nombre de nombres de Fibonacci a calculer }
          f : entier            { le nombre de Fibonacci couramment calcule    }
          dernier : entier      { le dernier nombre de Fibonacci calcule       }
          avantDernier : entier { l’avant-dernier nombre de Fibonacci calcule  }
          i : entier            { variable compteur                            }
  n := lire()
  avantDernier := 1
  dernier := 2
  ecrire(avantDernier)
  ecrire(dernier)
  pour i de 3 ŕ n faire
    f := dernier + avantDernier
    ecrire(f)
    avantDernier := dernier
    dernier := f
  fait
fin action