LES BOUCLES FOR, WHILE ET REPEAT
La boucle la plus naturelle en Pascal est la boucle FOR. L'instruction à l'intérieur du bloc FOR est exécutée un nombre de fois dépendant des conditions de contrôle. Le format de la boucle FOR est:

	FOR nom_de_variable:= valeur_initiale TO valeur_finale DO  instruction


	FOR nom_de_variable:= valeur_initiale TO valeur_finale DO
	begin
	    instruction; {Pour exécuter plus d'une instruction dans une}
	    instruction; {boucle for, vous les groupez en utilisant    }
	    instruction  {les mots-clés begin et end                   }
	end


	FOR nom_de_variable:= valeur_initiale DOWNTO valeur_finale DO instruction

Vous ne pouvez changer la valeur de la variable de contrôle (nom_de_variable) dans la boucle. Le programme suivant illustre l'instruction for:

	program  CELCIUS_TABLE ( output );
	var      celcius : integer; fahrenheit : real;
	begin
	         writeln('Degres Celcius   Degres Fahrenheit');
	         for  celcius := 1  to  20  do
	         begin
	             fahrenheit := ( 9 / 5 ) * celcius + 32;
	             writeln( celcius:8, '      ',fahrenheit:16:2 )
	         end
	end.

EXERCICE
Qu'affiche le programme suivant lors de son exécution?

	program  FOR_TEST ( output );
	var      s, j, k, i, l : integer;
	begin
	         s := 0;
	         for  j:= 1 to 5 do
	         begin
	             write( j );
	             s := s + j
	         end;
	         writeln( s );
	         for  k := 0 to 1 do write( k );
	         for  i := 10 downto 1 do writeln( i );
	         j := 3; k := 8; l := 2;
	         for  i := j to k do  writeln( i + l )
	end.

Cliquez ici pour afficher la réponse
PROGRAMME NEUF
Pour les vingt premières valeurs en fahrenheit, affichez l'équivalent en degrés celsius (utilisez le format d'une table avec des titres appropriés). [C = ( 5 / 9 ) * Fahrenheit - 32]

Cliquez ici pour obtenir la réponse


Copyright B Brown/P Henry/CIT, 1988-1995. Tous droits réservés.
Copyright UCL/INGI, 1995. Tous droits réservés
URL: http://candix1.fsa.ucl.ac.be/langages/Pascal/tutoriel/pas022.htm