{ Recherche de la presence d'une valeur entiere }
{ dans un tableau d'entiers trie                }
{ par ordre croissant                           }
{ Methode dichotomique                          }

constante entier N <- ...

booleen fonction estPresent(v,t)
  Donnees
    v : entier
    t : Tableau[N] de entier
  Locales
    stop : booleen
    res : booleen
    indi : entier
    indf : entier
    indm : entier
    valm : entier
  res <- faux
  stop <- faux
  indi <- 0
  indf <- N-1
  tantque stop = faux faire
    si indi > indf alors
      stop <- vrai
      sinon
      indm <- (indi+indf)/2
      valm <- t[indm]
      si valm = v alors
        stop <- vrai
        res <- vrai
        sinon
        si v < valm alors
          indf <- indm-1
          sinon
          indi <- indm+1
        fsi
      fsi
    fsi
  fait
  retourner res
fin fonction