To/fr

From Free Pascal wiki

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.

Lire en plus