Page 984 - IT2

T : Tableau de n réels ;
Debut
MaxT[0] ;
Pour i de 0 à n-1
Si T[i]>max
MaxT[i] ;
Finsi
Finpour
Pour i de 0 à n-1
Si T[i]=max
Afficher(i) ;
Finsi
Finpour
Fin

b) Ecrire un sous algorithme permettant de chercher et d’afficher les éléments du tableau dont leurs
doubles figurent également dans le tableau.
Procédure affichage ()
Var
I,n,j :entier ;
T : Tableau de n réels ;
X :réel ;
Debut
Pour i de 0 à n-1
x= 2*T[i] ;
Pour j de 0 à n-1
Si (T[j]=x)
Afficher (T[i]) ;
finsi
Finpour
Finpour
Fin

c) Ecrire un sous algorithme prenant comme paramètres d’entrée un élément x et affichant les diviseurs
de x présents dans le tableau.

Procédure AffichageDiviseurs(x :réel)
Var
I :entier ;
Debut
Pour i de 0 à n-1
Si (x MOD T[i] =0)
Afficher (T[i]) ;
finsi
Filière Epreuve Session 3/12
TDM Synthèse V1(Correction) Juillet 2014
www.itlearning-settat.com

Email: admission@itlearning-settat.com
Tél.:0661077812