HP Prime Manuel De L'utilisateur page 638

FOR DOWN
FOR DOWN STEP
WHILE
636
Exemple 2 : ce
programme trace un
motif intéressant sur
l'écran.
EXPORT
DRAWPATTERN()
BEGIN
LOCAL
xincr,yincr,color;
STARTAPP("Fonction");
RECT();
xincr := (Xmax - Xmin)/320;
yincr := (Ymax - Ymin)/240;
FOR X FROM Xmin TO Xmax STEP xincr DO
FOR Y FROM Ymin TO Ymax STEP yincr DO
color := FLOOR(X^2+Y^2) MOD 32768;
PIXON(X,Y,color);
END;
END;
FREEZE;
END;
Syntaxe : FOR var FROM début DOWNTO fin DO
commandes END;
Définit la variable var sur la valeur début et, tant que la
valeur de cette variable est inférieure ou égale à la valeur
fin, exécute la séquence de commandes, puis soustrait 1
(diminution) de var.
Syntaxe : FOR var FROM début DOWNTO fin [STEP
augmentation] DO commandes END;
Définit la variable var sur la valeur début et, tant que la
valeur de cette variable est inférieure ou égale à la valeur
fin, exécute la séquence de commandes, puis soustrait
augmentation de var.
Syntaxe : WHILE test DO commandes END;
Evalue test : si le résultat est vrai (valeur différente de 0),
exécute commandes de manière itérative.
Programmation