testDemo03-Repeter_1.txt

# Fichier de test de l'instruction repeter
# Resultats attendus :
# testRepeter1 = 1
# testRepeter2 = 1
# Les lignes de commentaires commencent par #
procedure principale()
#test1 : on teste le repeter avec une variable i
  i = 0;
  repeter
    i = i + 1;                  
  jusqua(i==5);                 # tant que i !=5, i = i+1
    testRepeter1 = (i==5);      # Vrai, testRepeter1 = 1;

finproc
# Commentaire Final