Recherche:

Pour tout nombre entier compris entre 0 et 100, on fera telle chose.


for n := 0 to 100 do
begin
end;

Maintenant, si tu changes la valeur de n au beau milieu de la boucle, c'est sûr que ça...

Moi aussi je trouve ton code un peu difficile à comprendre (étant donnée la simplicité de l'algorithme).

Pour parcourir la série des nombres à étudier, il serait plus naturel d'utiliser for que...