Tutoriel Basic

octobre 2000

FOR

Cette partie de la programmation en général est assez énervante pour ma par car il ne faut rien oublier ou sinon le programme risque de ne plus s’arrêter. Je m'explique, les boucles servent à répéter plusieurs fois une même instruction et si cette boucle ne se termine jamais alors le reste du programme ne sera pas exécuté et la boucle continuera sans s’arrêter. Mais bien entendu, je ne vais pas vous donner un exemple qui ne fonctionne pas, c'est logique.
exemple:

FOR numero% = 1 TO 10
PRINT "le numéro "; numero%
NEXT
END

Le programme donne a numero la valeur 1 et lui ajoute 1 jusqu'a ce qu'il atteigne 10 mais pendant ce decompte on peut ajouter des commandes comme je l'ai fait avec print.
On peut ajouter à cette boucle STEP qui définira de combien se fera le décompte.
exemple:

FOR numero% = 4 TO 12 STEP 2
PRINT "le numéro "; numero%
NEXT
END

Là on compte de 2 en 2.

Voici une autre boucle utilisée d'une autre manière.

exemple:

CLS
WHILE result = "2"
INPUT "1+1= " ; result
WEND
REM WEND signifie que la boucle est finie.
END

En bon français cela donne :
tant que result ne sera pas egale à "2" je poserai ma question "1+1= ".

DO…LOOP

DO…LOOP (boucle)

Encore une boucle me direz vous, oui, mais differente. Alors celle ci commence par do puis il faut mettre les commandes de la boucle on ajoute loop et until qui indiquera la condition pour stopper la boucle .

Rien qu’un exemple pour traduire cela :

Cls
Do
Input " tapez oui " ;rep$
Loop until rep$ = " oui "
Print " enfin "
End

-precedent- -sommaire- -Suivant-