:: For-Next ::




1/ Le listing brut :

10 FOR CT%=1 TO 5
20 PRINT "COMMODORE 64"
30 NEXT CT%

Ce programme affiche 5 fois le texte COMMODORE 64 à l'écran. On peut également l'écrire comme suit :

10FORCT%=1TO5
20?"COMMODORE 64"
30NEXT


2/ Le listing commenté :

10 FOR CT%=1 TO 5
// Ligne 10 : On initialise la variable de type ENTIER appelée CT% à 1 et on boucle tant que son contenu est inférieur à 6.
20 PRINT "COMMODORE 64"
// Ligne 20 : On affiche le texte COMMODORE 64 sur l'écran.
30 NEXT CT%
// Ligne 30 : On incrémente la variable CT% de 1 et on saute à la ligne numéro 10 tant que le contenu de CT% est inférieur à 6.


3/ Commentaires additionnels :

On peut choisir de combien on va incrémenter ou décrémenter la valeur de CT% à chaque boucle en précisant le STEP :

10 FOR CT%=1 TO 5 STEP 2
20 PRINT "COMMODORE 64"
30 NEXT CT%

A chaque boucle, CT% est incrémenté de 2. Le texte COMMODORE 64 n'apparaît plus que 3 fois à l'écran.

On peut utiliser un STEP à virgule :

10FORNB=1TO10STEP.5
20PRINTNB,
30NEXTNB

Ici, la variable de type FLOTTANT nommée NB est incrémentée de 0.5 à chaque boucle ; Elle prend successivement les valeurs 1, 1.5, 2, 2.5, 3, 3.5, [...], 9, 9.5, 10. Sa valeur est affichée 19 fois à l'écran comme suit :

        1
        1.5
        2
        2.5
        3
        3.5
        4
        4.5
        5
        5.5
        6
        6.5
        7
        7.5
        8
        8.5
        9
        9.5
        10