TD : 4
. Exercice n°1
Objectif : Vérifier si tous les éléments d'un tableau sont pairs
Début
LireN
Déclarer T[N] comme tableau d'entiers
Pour i de 0 à N-1 faire
LireT[i]
FinPour
est Pair <- vrai
Pouride0àN-1faire Si
T[i] % 2 ≠0 alors
estPair<-faux Fin
Si
FinPour
Si est Pair alors
Afficher "Pair"
Sinon
Afficher"Nonpair"
Fin Si
Fin
Exercice n°2
Objectif: Remplir un tableau et créer deux tableaux pour les éléments pairs et impairs.
Début
Lire N
DéclarerT[N]commetableaud'entiers Pour i
de 0 à N-1 faire
LireT[i]
Fin Pour
Déclarer TP[8] comme tableau d'entiers (pour les pairs)
DéclarerTI[8]commetableaud'entiers(pourlesimpairs)
tailleTP <- 0
tailleTI <- 0
Pouride0àN-1faire
SiT[i]%2=0alors
TP[tailleTP] <- T[i]
tailleTP<-tailleTP+1
Sinon
TI[tailleTI] <- T[i]
tailleTI<-tailleTI+1
Fin Si
FinPour
Afficher"TP:LatailledeTPest:",tailleTP Pour i de
0 à tailleTP-1 faire
AfficherTP[i]
Fin Pour
Afficher"TI:LatailledeTIest:",tailleTI Pour i
de 0 à tailleTI-1 faire
AfficherTI[i]
Fin Pour
Fin
Exercice n°3
Objectif: Afficher la valeur pré-supérieure d'un tableau d'entiers.
Début
LireN
DéclarerT[N]commetableaud'entiers
Pour i de 0 à N-1 faire
LireT[i]
FinPour
préSupérieur <- T[0]
Pouride1àN-1faire
SiT[i]>préSupérieuralors
préSupérieur <- T[i]
Fin Si
FinPour
Afficher"Lepré-supérieurest:",préSupérieur Fin
Exercice n°4
Objectif: Crypter un tableau de caractères.
Début
LireN
DéclarerT[N]commetableaudecaractères
Pour i de 0 à N-1 faire
LireT[i]
Fin Pour
Pouride0àN-1faire ascii
<- Ord(T[i]) unités<-
ascii%10
dizaines <- (ascii / 10) % 10
nouveauAscii<-(unités*10)+dizaines T[i]
<- Chr(nouveauAscii)
FinPour
chaîneRésultat<-""
Pouride0àN-1faire
chaîneRésultat<-chaîneRésultat+T[i] Fin
Pour
Afficher"Lachaîneobtenueest:",chaîneRésultat Fin
Exercice n°5
Objectif: Insérer un entier dans un tableau à une position donnée.
Début
LireN
DéclarerT[N]commetableaud'entiers
Pour i de 0 à N-1 faire
LireT[i]
Fin Pour
Lirem,p
Sip>=Nalors T[N]
<- m
N<-N+1
Sinon
PourideN-1àpfaire
T[i+1] <- T[i]
Fin Pour
T[p] <- m
N<-N+1
FinSi
Afficher "T : "
Pouride0àN-1faire
Afficher T[i]
FinPour
Fin
Exercice N°6
Objectif: Saisir une matrice M de dimensions NxP ,calculer sa transposée Q, et afficher les
éléments de M et Q.
Début
//Saisirlesdimensionsdelamatrice Lire
N, P
DéclarerM[N][P]commematricederéels
DéclarerQ[P][N]commematricede réels
//SaisirlesélémentsdelamatriceM Pour i
de 0 à N-1 faire
Pourjde0àP-1faire
Lire M[i][j]
FinPour
Fin Pour
//CalculerlatransposéeQ
Pour i de 0 à N-1 faire
Pourjde0àP-1faire Q[j]
[i] <- M[i][j]
FinPour
Fin Pour
//AfficherlesélémentsdeM
Afficher "M :"
Pour i de 0 à N-1 faire
Pourjde0àP-1faire
AfficherM[i][j]
Fin Pour
FinPour
//AfficherlesélémentsdeQ
Afficher "Q :"
Pour i de 0 à P-1 faire
Pourjde0àN-1faire
AfficherQ[i][j]
Fin Pour
FinPour
Fin
Exercice N°7
Objectif: Saisir une matrice carrée M de dimensions NxN et vérifier si elle est triangulaire supérieure.
Début
//Saisirladimensiondelamatrice Lire
N
DéclarerM[N][N]commematricederéels
//SaisirlesélémentsdelamatriceM
Pour i de 0 à N-1 faire
Pourjde0àN-1faire Lire
M[i][j]
FinPour
Fin Pour
//VérifiersiMesttriangulairesupérieure
estTriangulaireSup <- vrai
Pour i de 1 à N-1 faire
Pourjde0ài-1faire
Si M[i][j] ≠ 0 alors
estTriangulaireSup<-faux
Fin Si
FinPour
FinPour
//Afficher le résultat
SiestTriangulaireSupalors
Afficher"Mesttriangulairesupérieure."Sino
n
Afficher"Mn'estpastriangulairesupérieure." Fin
Si
Fin
Exercice N°8
Objectif: Développer une application de gestion d'inventaire pour un magasin.
Début
//Saisir le nombre de rayons et de types de produits
Lire nombre Rayons, nombre Produits
Déclarer stock[nombre Rayons][nombre Produits] comme matriced'entiers
Déclarer quantite Totale[nombre Produits] comme tableau d'entiers
Déclarer prix Unitaire[nombre Produits] comme tableau de réels
Déclarer prix Total[nombre Produits]comme tableau de réels
//Saisir la quantité de chaque produit dans les rayons
Pour i de 0 à nombre Rayons-1 faire
Pourjde0ànombreProduits-1faire Lire
stock[i][j]
FinPour
Fin Pour
//Mettre à jour la quantité d'un produit dans un rayon
Lire rayon, produit, nouvelle Quantite stock[rayon]
[produit] <- nouvelle Quantite
//Calculer la quantité totale de chaque produit
Pour j de 0 à nombre Produits-1 faire
Quantite Totale[j] <- 0
Pour i de 0 à nombre Rayons-1 faire quantite
Totale[j]<-quantite Totale[j]+stock[i][j]
Fin Pour
Fin Pour
//Saisir le prix unitaire de chaque produit
Pour j de 0 à nombre Produits-1 faire
Lire prix Unitaire[j]
Fin Pour
// Calculer le prix total des produits
Pourjde0ànombreProduits-1faire
Prix Total[j]<-quantite Totale[j]*prix Unitaire[j]
Fin Pour
//Supprimer les cas avec un prix total égal à zéro
Pour j de
