{ Test de la présence d'une valeur entiere      }
{ dans un tableau d'entiers                     }
{ sans organisation particuliere                }
{ Methode sequentielle                          }
{ Retour de vrai si présent, faux sinon         }
{ v : Entier recherché                          }
{ t : Le tableau d'entiers de recherche         }

booleen fonction estPresent(-> entier v,
                            -> entier [] t)
  booleen trouve <- faux
  entier i <- 0
  tantque ( trouve == faux ) et ( i < longueur(t) ) faire
    si t[i] == v alors
      trouve <- vrai
      sinon
      i <- i+1
    fsi
  fait
  retourner trouve
fin fonction