Exercice 18 : Recherche dichotomique

debut du programme Dichotomie
ecrire ('Quelle est la borne inférieure :')
lire borneinf
ecrire ('Quelle est la borne supérieure :')
lire bornesup
nbEtape <- 0
tant que borneinf <> bornesup
valeur_medium = partie_entiere de (borneinf+bornesup)/2
ecrire ('La valeur est-elle egale à valeur_medium ? [O/N]')
lire reponseOuiNon
si reponseOuiNon = O
alors
borneinf = valeur_medium
bornesup = valeur_medium
sinon
ecrire ('La valeur est-elle supérieure à valeur_medium ? [O/N]')
lire reponseOuiNon
si reponseOuiNon = O
alors
borneinf = valeur_medium
sinon
bornesup = valeur_medium
finsi
finsi
fintant que
fin