Propositions de corrections – Travaux dirigés – Algorithmique
Dr. Pegdwendé N. Sawadogo
TD N°3
Exercice 1
Algorithme RemplirTableau
Variables : i, val : entier,
tab : Tableau[10] entiers ;
Début
i1;
Tant que ( i ≤ 10) Faire
Écrire(‘’Veuillez entrer le nombre n°’’, i) ;
Lire(val) ;
Tab[i] val ;
i i + 1;
FinTantque
Fin
Exercice 2
Algorithme MoyenneTableau
Variables : i, val, somme, moy : entier,
tab : Tableau[10] entiers ;
Début
i1;
Tant que ( i ≤ 10) Faire
Écrire(‘’Veuillez entrer le nombre n°’’, i) ;
Lire(val) ;
Tab[i] val ;
i i + 1;
FinTantque
i0;
somme 0 ;
Tant que (i ≤ 10) Faire
somme somme + tab[i] ;
FinTantque
moy somme/10 ;
Écrire(‘’La moyenne est ‘’, moy) ;
Fin
Exercice 3
Algorithme AfficherElementsPairs
Variables : i, val : entier,
tab : Tableau[10] entiers ;
Début
i1;
Tant que ( i ≤ 10) Faire
Écrire(‘’Veuillez entrer le nombre n°’’, i) ;
Lire(val) ;
Tab[i] val ;
i i + 1;
FinTantque
i 1;
Tant que (i ≤ 10) Faire
Si (tab[i] MOD 2 = 0) Alors
Afficher(tab[i]) ;
FinSi
ii+1;
FinTantque
Fin
Exercice 4
Algorithme AfficherElementsIndicePairs
Variables : i, val : entier,
tab : Tableau[10] entiers ;
Début
i1;
Tant que ( i ≤ 10) Faire
Écrire(‘’Veuillez entrer le nombre n°’’, i) ;
Lire(val) ;
Tab[i] val ;
i i + 1;
FinTantque
i 1;
Tant que (i ≤ 10) Faire
Si (i MOD 2 = 0) Alors
Afficher(tab[i]) ;
FinSi
ii+1;
FinTantque
Fin
Exercice 5
Algorithme PlusGrand
Variables : i : entier,
max :réel ;
tab : Tableau[20] réels ;
Début
max tab[1];
Pour (i 1 à 20) Faire
Si (tab[i] > max) Alors
max tab[i] ;
FinSi
FinPour
Afficher(‘’La valeur maximale est ’’, max) ;
Fin
Exercice 6
Algorithme AfficheInverse
Variables : i, val : entier,
tab : Tableau[10] entiers ;
Début
i1;
Tant que ( i ≤ 10) Faire
Écrire(‘’Veuillez entrer le nombre n°’’, i) ;
Lire(val) ;
Tab[i] val ;
i i + 1;
FinTantque
i 10 ;
Tant que (i ≥ 1) Faire
Afficher(tab[i]) ;
ii–1;
FinTantque
Fin
Exercice 7
Algorithme EcartMaxMin
Variables : i, max, min : entier,
tab : Tableau[10] entiers ;
Début
max tab[1];
min tab[1] ;
Pour (i 1 à 10) Faire
Si (tab[i] > max) Alors
max tab[i] ;
FinSi
Si (tab[i] < min) Alors
min tab[i] ;
FinSi
FinPour
Afficher(‘’Le plus grand écart est ’’, max - min) ;
Fin
Exercice 8
Algorithme SommeMatrices
Variables : M1 : Tableau[3,4] entiers,
M2 : Tableau[3,4]entiers,
M3 : Tableau[3,4]entiers
i, j :entiers;
Début
Pour (i 1 à 3) Faire
Pour (j 1 à 4) Faire
M3[i,j] M1[i,j] + M2[i,j];
Afficher(M3[i,j]);
FinPour
FinPour
Fin
Exercice 9
Algorithme Moyenne
Variables : tab : Tableau[4,3] : entiers,
tabMoy : Tableau[3]
i, j, somme :entiers ;
moy :réel ;
Pour(j 1 à 3) Faire
somme 0 ;
Pour(i 1 à 4) Faire
Somme somme + tab[i, j] ;
FinPour
moy somme / 4 ;
tabMoy[j] moy ;
FinPour
Exercice 10
Algorithme Tri
Variables : tab : Tableau[20] : entiers,
temp :entiers ;
Pour(i 1 à 20) Faire
Pour(j 1 à 19) Faire
Si (tab[j] > tab[j+1]) Alors
temp tab[j+1] ;
tab[j+1] tab[j] ;
tab[j] temp ;
FinSi
FinPour
FinPour