Page 1022 - IT2

rep "non" ;
Debut
Pour i=0 à l faire
Pour j=0 à c faire
Si(T(i,j))=x) alors
rep "oui" ;

finsi

finpour
finpour
si(rep="oui" ) alors
retourner "oui"
sinon
retourner "non"
finsi

fin
4. Ecrire une procedure Transposer_Tableau (Tableau ,lignes ,colonnes) qui permet
de transposer les éléments de tableau T(2pts)
Procedure Transposer_Tableau (T :tableau ,l :entier,c :entier)
Var i,j,aux :entier ;
Debut
Pour i=0 à l faire
Pour j=0 à c faire
aux T(i,j)
T(i,j) T(j,i)
T(j,i) aux
finpour
finpour
fin

5. Concevoir le menu suivant(4 pts)

----------------------MENU-------------------------------------------------

1. Lire
2. Afficher

3. Rechercher
4. Transposer

Entrer votre choix :

Debut

Var choix : entier
Ecrire("----------MENU-----------" ) ;

Ecrire("1.lire" ) ;

Filière Epreuve Session Page 4 sur 14
TDM Synthèse V1 Juillet 2015