For/fr: what changed

Revision 1 to 2. Removed lines have a minus sign; added lines have a plus sign.

Old	New		Line
1		-	\
2	1		[[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 :
3	2
4	3		`FOR ``control_variable`` := ``start`` `[[To/fr\|TO]]` ``final`` DO ``statement`
5	4
6	5		qui augmente control_variable de 1 à chaque exécution de la boucle jusqu'à ce que la valeur soit supérieure ou égale à final ou
7	6
8	7		`FOR ``control_variable`` := ``start`` `[[Downto/fr\|DOWNTO]]` ``final`` do ``statement`
9	8
10	9		qui diminue control_variable de 1 à chaque exécution de la boucle jusqu'à ce que la valeur soit inférieure ou égale à final
11	10
12	11		où control_variable Where control_variable est la variable mise à la valeur start au départ.
13	12
14	13		``` pascal
15	14		For I:=1 To 100 Do statement;
16	15		```
17	16
18	17		(répète statement 100 fois, en augmentant I de 1 à 100)
19	18
20	19		``` pascal
21	20		for I:=100 downto 1 do ''statement'';
22	21		```
23	22
24	23		(répète statement 100 fois, en diminuant I de 100 à 1)
25	24
26	25		- 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/fr\|Begin]]/[[End/fr\|End]].
27	26		- Dans une boucle for..to, si start est supérieur à final, la boucle n'est pas exécutée.
28	27		- Dans une boucle for..downto, si start is inférieur à final, la boucle n'est pas exécutée.
29	28
30	29		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.
31	30
32	31		## Variables enumérées
33	32
34	33		[[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 :
35	34
36	35		``` pascal
37	36		program Fruits;
38	37		type
39	38		TFruit = (fPomme, fPoire, fFraise, fMirabelle, fPrune, fFramboise, fCassis);
40	39		const
41	40		FruitTextes: array[TFruit] of String =
42	41		('Pomme', 'Poire', 'Fraise', 'Mirabelle', 'Prune', 'Framboise', 'Cassis');
43	42		begin
44	43		WriteLn(' Liste des fruits ');
45	44		for f := Low(TFruit) to High(TFruit) do
46	45		WriteLn(FruitTextes[f]);
47	46		End;
48	47
49	48		End.
50	49		```
51	50
52	51		## Extension de Pascal Objet
53	52
54	53		- [[for-in loop/fr\|Boucle for...in]]
55	54
56	55		L'exemple des fruits devient :
57	56
58	57		``` pascal
59	58		program Fruits;
60	59		type
61	60		TFruit = (fPomme, fPoire, fFraise, fMirabelle, fPrune, fFramboise, fCassis);
62	61		const
63	62		FruitTextes: array[TFruit] of String =
64	63		('Pomme', 'Poire', 'Fraise', 'Mirabelle', 'Prune', 'Framboise', 'Cassis');
65	64		begin
66	65		WriteLn(' Liste des fruits ');
67	66		for f in TFruit do
68	67		WriteLn(FruitTextes[f]);
69	68		End;
70	69
71	70		End.
72	71		```
73	72
74	73		Ce qui est plus joli, non ?
75	74
76	75		## Voir aussi
77	76
78	77		- [[Example: Why the loop variable should be of signed type]]
79	78
80	79		---
81	80		From the Free Pascal wiki, page "For/fr", as it stood on 2020-02-15 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).

Back to history