Difference between revisions of "To/fr"

From Free Pascal wiki
Jump to navigationJump to search
(Created page with "{{to}} 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 variabl...")
 
m (Fixed syntax highlighting)
 
Line 4: Line 4:
  
 
== [[For/fr|For]] to [[Do/fr|do]] ==
 
== [[For/fr|For]] to [[Do/fr|do]] ==
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
 
var i : integer;
 
var i : integer;
 
begin
 
begin
Line 19: Line 19:
 
=== Exemple basique ===
 
=== Exemple basique ===
  
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
 
var
 
var
 
   loopValue, startValue, endValue, resultValue: integer;
 
   loopValue, startValue, endValue, resultValue: integer;
Line 38: Line 38:
 
=== Valeurs de début et fin identiques ===
 
=== Valeurs de début et fin identiques ===
  
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
  
 
var
 
var
Line 58: Line 58:
  
 
=== Valeur initiale supérieure à la valeur finale ===
 
=== Valeur initiale supérieure à la valeur finale ===
<syntaxhighlight>
+
 
 +
<syntaxhighlight lang=pascal>
 
var
 
var
 
   loopValue, startNumber, endNumber, resultValue: integer;
 
   loopValue, startNumber, endNumber, resultValue: integer;

Latest revision as of 10:55, 1 March 2020

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