{ Fonction de calcul et retour                 }
{ de Fib(n) par methode sequentielle           }
{ Définition:                                  }
{  - Fib(0) = 0                                }
{  - Fib(1) = 1                                }
{  - Fib(n) = Fib(n-1)+Fib(n-2)                }
{ n : valeur pour laquelle Fib(n) est calculé  }

entier fonction fib(-> entier n)
  entier res
  entier a
  entier b
  entier i
  dans le cas de n
    0 :
    1 :
      res <- n
    autres cas :
      res <- 0
      a <- 0
      b <- 1
      pour i de 2 à n faire
        res <- a+b
        a <- b
        b <- res
      fait
  fcas
  retourner res
fin fonction