Exercice 5 – Copier les valeurs paires dans un second tableau Correction complète en Algorithme
Procédure Copier_Pairs PROCÉDURE Copier_Pairs(T, N, P, NP) // T : tableau d'entrée // N : taille
du tableau T // P : tableau contenant les valeurs paires // NP : nombre d'éléments dans P Début k
← 0 Pour i ← 0 à N - 1 faire Si (T[i] mod 2 = 0) alors P[k] ← T[i] k ← k + 1 FinSi FinPour NP ← k Fin
FINPROCÉDURE Programme Principal VARIABLES : T, P : Tableaux N, NP : Entiers Début
Écrire("Donner la taille N du tableau T : ") Lire(N) Pour i ← 0 à N - 1 faire Écrire("T[", i, "] = ")
Lire(T[i]) FinPour Appeler Copier_Pairs(T, N, P, NP) Écrire("Les valeurs paires trouvées sont : ")
Pour i ← 0 à NP - 1 faire Écrire(P[i]) FinPour Fin