To/fr
From Lazarus wiki
Jump to navigationJump to search
│
Deutsch (de) │
English (en) │
français (fr) │
русский (ru) │
Mot-clé utilisé pour indiquer la valeur finale de la variable de contrôle dans une boucle For, et que la boucle va incrémenter la variable de contrôle de 1 à chaque boucle. La valeur spécifiée par TO doit être supérieure ou égale à la valeur initiale de la boucle (dans le cas contraire, la boucle n'est pas exécutée).
For to do
var i : integer;
begin
for i := 1 to 10000 do
begin
//...
end;
end;
Le For...to permet d'exécuter du code répétitivement avec un nombre fixé d'itérations.
Exemple basique
var
loopValue, startValue, endValue, resultValue: integer;
begin
startValue := 10;
endValue := 11;
resultValue := 0;
for loopValue := startValue to endValue do
begin
resultValue := loopValue + resultValue;
end;
end;
La boucle s'exécute deux fois et la valeur de la variable resultValue est 21.
Valeurs de début et fin identiques
var
loopValue, startValue, endValue, resultValue: integer;
begin
startValue := 10;
endValue := 10;
resultValue := 0;
for loopValue := startValue to endValue do
begin
resultValue := loopValue + resultValue;
end;
end;
La boucle s'exécute une fois et la valeur de la variable resultValue est 10.
Valeur initiale supérieure à la valeur finale
var
loopValue, startNumber, endNumber, resultValue: integer;
begin
startValue := 10;
endValue := 9;
resultValue := 0;
for loopValue := startValue to endValue do
begin
resultValue := loopValue + resultValue;
end;
end;
La boucle ne s'exécute pas et la valeur de la variable resultValue est 0.