Difference between revisions of "For/fr"

From Lazarus wiki
(Created page with "{{for}} <br> keyword utilisé avec "to" ou "downto" et "do" pour parcourir une boucle dans laquelle la variable de contrôle e...")
 
m (Fixed syntax highlighting; deleted category included in page template)
 
(One intermediate revision by one other user not shown)
Line 3: Line 3:
 
[[Keyword/fr|keyword]] utilisé avec "[[To/fr|to]]" ou "[[Downto/fr|downto]]" et "[[Do/fr|do]]" pour parcourir une boucle dans laquelle la variable de contrôle est incrémentée ou décrémentée de 1 à chaque fois :
 
[[Keyword/fr|keyword]] utilisé avec "[[To/fr|to]]" ou "[[Downto/fr|downto]]" et "[[Do/fr|do]]" pour parcourir une boucle dans laquelle la variable de contrôle est incrémentée ou décrémentée de 1 à chaque fois :
  
  FOR ''control_variable'' := ''start'' [[To|TO]] ''final'' DO ''statement''
+
  FOR ''control_variable'' := ''start'' [[To/fr|TO]] ''final'' DO ''statement''
 
qui augmente ''control_variable'' de 1 à chaque exécution de la boucle jusqu'à ce que la valeur soit supérieure ou égale à ''final''
 
qui augmente ''control_variable'' de 1 à chaque exécution de la boucle jusqu'à ce que la valeur soit supérieure ou égale à ''final''
 
ou
 
ou
  FOR ''control_variable'' := ''start'' [[Downto|DOWNTO]] ''final'' do ''statement''
+
  FOR ''control_variable'' := ''start'' [[Downto/fr|DOWNTO]] ''final'' do ''statement''
 
qui diminue ''control_variable'' de 1 à chaque exécution de la boucle jusqu'à ce que la valeur soit inférieure ou égale à ''final''
 
qui diminue ''control_variable'' de 1 à chaque exécution de la boucle jusqu'à ce que la valeur soit inférieure ou égale à ''final''
 
   
 
   
Line 12: Line 12:
 
Where ''control_variable'' est la variable mise à la valeur ''start'' au départ.
 
Where ''control_variable'' est la variable mise à la valeur ''start'' au départ.
  
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
 
For I:=1 To 100 Do statement;
 
For I:=1 To 100 Do statement;
 
</syntaxhighlight>
 
</syntaxhighlight>
 
(répète ''statement'' 100 fois, en augmentant I de 1 à 100)
 
(répète ''statement'' 100 fois, en augmentant I de 1 à 100)
  
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
 
   for I:=100 downto 1 do ''statement'';
 
   for I:=100 downto 1 do ''statement'';
 
</syntaxhighlight>
 
</syntaxhighlight>
Line 31: Line 31:
 
[[Pascal/fr|Pascal]] permet d'employer une variable de contrôle d'un type énuméré (par exemple un booléen) au lieu d'un variable entière :
 
[[Pascal/fr|Pascal]] permet d'employer une variable de contrôle d'un type énuméré (par exemple un booléen) au lieu d'un variable entière :
  
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
 
program Fruits;
 
program Fruits;
 
type
 
type
Line 50: Line 50:
 
* [[for-in_loop/fr|Boucle for...in]]
 
* [[for-in_loop/fr|Boucle for...in]]
 
L'exemple des fruits devient :
 
L'exemple des fruits devient :
<syntaxhighlight>
+
<syntaxhighlight lang=pascal>
 
program Fruits;
 
program Fruits;
 
type
 
type
Line 72: Line 72:
  
 
{{Keywords/fr}}
 
{{Keywords/fr}}
 
 
[[Category:Pascal/fr]]
 
[[Category:Control Structures/fr]]
 

Latest revision as of 00:30, 16 February 2020

Deutsch (de) English (en) français (fr) русский (ru)

keyword utilisé avec "to" ou "downto" et "do" pour parcourir une boucle dans laquelle la variable de contrôle est incrémentée ou décrémentée de 1 à chaque fois :

FOR control_variable := start TO final DO statement

qui augmente control_variable de 1 à chaque exécution de la boucle jusqu'à ce que la valeur soit supérieure ou égale à final ou

FOR control_variable := start DOWNTO final do statement

qui diminue control_variable de 1 à chaque exécution de la boucle jusqu'à ce que la valeur soit inférieure ou égale à final

control_variable Where control_variable est la variable mise à la valeur start au départ.

For I:=1 To 100 Do statement;

(répète statement 100 fois, en augmentant I de 1 à 100)

  for I:=100 downto 1 do ''statement'';

(répète statement 100 fois, en diminuant I de 100 à 1)

  • FOR bouclera l'unique instruction qui le suit. Pour exécute plus d'une instruction, il faut entourer la séquence d'instructions avec un bloc Begin/End.
  • Dans une boucle for..to, si start est supérieur à final, la boucle n'est pas exécutée.
  • Dans une boucle for..downto, si start is inférieur à final, la boucle n'est pas exécutée.

After the loop, the value of control_variable will be final. If the loop was not executed, the value of control_variable does not change.

Variables enumérées

Pascal permet d'employer une variable de contrôle d'un type énuméré (par exemple un booléen) au lieu d'un variable entière :

program Fruits;
type
  TFruit = (fPomme, fPoire, fFraise, fMirabelle, fPrune, fFramboise, fCassis);
const
  FruitTextes: array[TFruit] of String =
    ('Pomme', 'Poire', 'Fraise', 'Mirabelle', 'Prune', 'Framboise', 'Cassis');
begin
  WriteLn('** Liste des fruits **');
  for f := Low(TFruit) to High(TFruit) do
    WriteLn(FruitTextes[f]); 
End;

End.

Extension de Pascal Objet

L'exemple des fruits devient :

program Fruits;
type
  TFruit = (fPomme, fPoire, fFraise, fMirabelle, fPrune, fFramboise, fCassis);
const
  FruitTextes: array[TFruit] of String =
    ('Pomme', 'Poire', 'Fraise', 'Mirabelle', 'Prune', 'Framboise', 'Cassis');
begin
  WriteLn('** Liste des fruits **');
  for f in TFruit do
    WriteLn(FruitTextes[f]); 
End;

End.

Ce qui est plus joli, non ?

Voir aussi



Mots-clés: begindoelseendforifrepeatthenuntilwhile