<?xml version="1.0" encoding="UTF-8"?>
<Algo>
    <description texte="Voici l'algorithme de Babylone pour déterminer un encadrement de racine de 2.&#xa;La précision p de l'encadrement est saisie par l'utilisateur." courant="AFFICHER &quot; &lt; racine de 2 &lt; &quot;"/>
    <fonction fctcode="" fctetat="inactif"/>
    <F2 F2defaut="" F2lignes="" F2etat="inactif" F2para=""/>
    <repere repetat="inactif" repcode="-10#10#-10#10#2#2"/>
    <item algoitem="VARIABLES" code="100#declarationsvariables">
        <item algoitem="u EST_DU_TYPE NOMBRE" code="1#NOMBRE#u"/>
        <item algoitem="v EST_DU_TYPE NOMBRE" code="1#NOMBRE#v"/>
        <item algoitem="a EST_DU_TYPE NOMBRE" code="1#NOMBRE#a"/>
        <item algoitem="b EST_DU_TYPE NOMBRE" code="1#NOMBRE#b"/>
        <item algoitem="p EST_DU_TYPE NOMBRE" code="1#NOMBRE#p"/>
    </item>
    <item algoitem="DEBUT_ALGORITHME" code="101#debutalgo">
        <item algoitem="u PREND_LA_VALEUR 2" code="5#u#2#pasliste"/>
        <item algoitem="v PREND_LA_VALEUR 1" code="5#v#1#pasliste"/>
        <item algoitem="LIRE p" code="2#p#pasliste"/>
        <item algoitem="TANT_QUE (u-v>p) FAIRE" code="15#u-v>p">
            <item algoitem="DEBUT_TANT_QUE" code="16#debuttantque"/>
            <item algoitem="a PREND_LA_VALEUR (u+v)/2" code="5#a#(u+v)/2#pasliste"/>
            <item algoitem="b PREND_LA_VALEUR 4/(u+v)" code="5#b#4/(u+v)#pasliste"/>
            <item algoitem="u PREND_LA_VALEUR a" code="5#u#a#pasliste"/>
            <item algoitem="v PREND_LA_VALEUR b" code="5#v#b#pasliste"/>
            <item algoitem="FIN_TANT_QUE" code="17#fintantque"/>
        </item>
        <item algoitem="AFFICHER v" code="3#v#0#pasliste"/>
        <item algoitem="AFFICHER &quot; &lt; racine de 2 &lt; &quot;" code="4# &lt; racine de 2 &lt; #0"/>
        <item algoitem="AFFICHER u" code="3#u#1#pasliste"/>
    </item>
    <item algoitem="FIN_ALGORITHME" code="102#finalgo"/>
</Algo>
