Boucles indéfinies tant qu'on n'appuie pas sur une touche ...
Encore plus court
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 i:= 9; REPEAT Dec(i); IF (i=1) THEN i:= 9 UNTIL ((i=0) OR KeyPressed); // Là, je suis sympa !
# Ici (Vf) est inférieur à (Vi); on a par conséquent:
Code : Sélectionner tout - Visualiser dans une fenêtre à part RETEAT UNTIL KeyPressed;
N = Abs(Vf - Vi)/Abs(h) + 1 = (Vf - Vi)/h + 1 .
Le résultat demeure inchangé, les deux termes du rapport changeant simultanément de signe.
# C'est intéressant, mais il faudra se prendre la tête à deux mains ...
Partager