Présentation de l'algorithme :

Principe de la méthode pour encadrer racine de a :

Code de l'algorithme :
VARIABLES
  x EST_DU_TYPE NOMBRE
  y EST_DU_TYPE NOMBRE
  a EST_DU_TYPE NOMBRE
DEBUT_ALGORITHME
  LIRE a
  x PREND_LA_VALEUR 1
  y PREND_LA_VALEUR a
  TANT_QUE (abs(y-x)>1e-8) FAIRE
    DEBUT_TANT_QUE
    x PREND_LA_VALEUR (x+y)/2
    y PREND_LA_VALEUR a/x
    SI (x<y) ALORS
      DEBUT_SI
      AFFICHER x
      AFFICHER " < racine < "
      AFFICHER y
      FIN_SI
      SINON
        DEBUT_SINON
        AFFICHER y
        AFFICHER " < racine < "
        AFFICHER x
        FIN_SINON
    FIN_TANT_QUE
FIN_ALGORITHME

Fichier AlgoBox associé : babylone.alg (faire un clic-droit et utiliser l'option "enregistrer sous" pour télécharger le fichier)

Tester l'algorithme :


(cliquer sur le bouton ci-dessus pour lancer ou relancer l'exécution de l'algorithme)
Remarque : si les messages "Algorithme lancé" et "Algorithme terminé" n'apparaissent pas au bout d'un moment dans la zone ci-dessous, c'est que l'algorithme contient une erreur.

Résultat :