Bonjour

repeat
write('donner une chaine :');
read(ch);
until(ch='END');
=> ce traitement donne une boucle infinie !!!!!!!:calim2: