Exercices
Ecrire un algorithme qui calcul la somme des éléments
d’un tableau.
Algorithme Somme
Variables
i, dim, S : Entiers
T[100] : Entier
Début
Ecrire ( "Saisir la dimension du tableau : " ) ;
Lire (dim ) ;
Ecrire ( "La saisie des éléments du tableau " ) ;
Pour (i ← 0 à dim-1 pas 1) Faire
Ecrire ( " T[ " , i , " ]= " ) ;
Lire (T[i]) ;
FinPour
S0;
Pour (i ← 0 à dim-1 pas 1) Faire
SS+T[i];
FinPour
Ecrire ("La somme est : ", S);
Fin
Exercices
Ecrire un algorithme permettant de saisir 30 notes et
de les afficher après avoir multiplié toutes ces notes
par un coefficient fourni par l’utilisateur
Algorithme Tableau_Note
Variables
i : Entiers
T[30] : Réel
C : Réel
Début
Ecrire ( "Saisir le coefficient : " ) ;
Lire (C) ;
Pour (i ← 0 à 29 pas 1) Faire
Ecrire ("Entrer la valeur de la note", i+1) ;
Lire (T[i]) ;
FinPour
Pour (i ← 0 à 29 pas 1) Faire
Ecrire (T[i]*C);
Ecrire (" ");
FinPour
Fin
Exercices
Écrire un algorithme qui trouve le maximum des
éléments d’un tableau T[10] en précisant quelle
position il occupe dans le tableau.
Algorithme Maximum
Variables
i, Max, Pos : Entiers
T[10] : Entier
Début
Pour (i ← 0 à 9 pas 1) Faire
Ecrire ( " T[ " , i , " ]= " ) ;
Lire (T[i]) ;
FinPour
Max T[0];
Pos 0;
Pour (i ← 1 à 9 pas 1) Faire
Si (T[i] > Max ) Alors
Max T[i];
Pos i ;
FinSi
FinPour
Ecrire ("Le maximum des éléments du tableau est : ", Max);
Fin
Exercices
Écrire un algorithme qui permet de demander à
l’utilisateur de saisir les notes (500 étudiants),
puis l’algorithme calcule et affiche la moyenne
des notes
Algorithme Moyenne-Notes
Variables
i : Entier
T[500] : Réel
M, S : Reel
Début
Pour (i ← 0 à 499 pas 1) Faire
Ecrire ("Entrer la valeur de la note", i+1) ;
Lire (T[i]) ;
FinPour
S 0;
Pour (i ← 0 à 499 pas 1) Faire
S S + T[i];
FinPour
M S/500;
Ecrire ("Le moyenne est : ", M);
Fin
Algorithme Moyenne-Notes
Variables
i : Entier
T[500] : Réel
M, S : Reel
Début
S 0;
Pour (i ← 0 à 499 pas 1) Faire
Ecrire ("Entrer la valeur de la note numéro : ", i+1) ;
Lire (T[i]) ;
S S + T[i];
FinPour
M S/500;
Ecrire ("Le moyenne est : ", M);
Fin
Exercices
Écrire un algorithme qui demande à l’utilisateur
de saisir les 10 réels, puis l’algorithme calcule et
affiche la somme, le produit et la moyenne des
éléments du tableau.
Algorithme Moy_Somme_Prod_Tableau
Variables
i : Entier
T[10] : Réel
M, S, P : Reel
Début
S 0;
P 1;
Pour (i ← 0 à 9 pas 1) Faire
Ecrire ("Entrer la valeur de la note numéro : ", i+1) ;
Lire (T[i]) ;
S S + T[i];
P P * T[i];
FinPour
M S/10;
Ecrire ("La somme est : ", S);
Ecrire ("Le produit est : ", P);
Ecrire ("Le moyenne est : ", M);
Fin
Exercices
Écrire un algorithme qui vérifie un tableau T[10]
est constitué que d’entiers positifs.
Algorithme ElementsPositifs
Variables
i : Entiers
T[10] : Entier
V: Boolean
Début
Pour (i ← 0 à 9 pas 1) Faire
Ecrire ("Entrer la valeur numéro : ", i+1) ;
Lire (T[i]) ;
FinPour
V Vrai;
Pour (i ← 0 à 9 pas 1) Faire
Si (T[i]<0) Alors
V Faux;
FinSi
FinPour
Si (V) Alors
Ecrire ("Le tableau est constitué que d’entiers positifs");
Sinon
Ecrire ("Le tableau n’est pas constitué que d’entiers positifs");
FinSi
Fin
Exercices
Écrire un algorithme permettant à l'utilisateur de saisir un
ensemble de valeurs qui seront stockées dans un tableau.
L'utilisateur commencera par la saisie de ces valeurs. Une
fois la saisie terminée, le programme affichera le nombre
de valeurs négatives et le nombre de valeurs positive.
Algorithme ElementsPositifNegatifs
Variables
i, CPos, CNeg : Entiers
T[10] : Entier
Début
Pour (i ← 0 à 9 pas 1) Faire
Ecrire ("Entrer la valeur numéro : ", i+1) ;
Lire (T[i]) ;
FinPour
CPos 0;
CNeg 0;
Pour (i ← 0 à 9 pas 1) Faire
Si (T[i]>=0) Alors
CPos CPos+1;
Sinon
Cneg Cneg+1;
FinSi
FinPour
Ecrire ("Le nombre d’entiers positifs est : ", CPos);
Ecrire ("Le nombre d’entiers négatifs est : ", CNeg);
Fin
Exercices
Ecrivez un algorithme constituant un tableau, à partir de
deux tableaux de même longueur préalablement saisis. Le
nouveau tableau sera la somme des éléments des deux
tableaux de départ.
Algorithme SommeTableaux
Variables
i : Entier
T1[10], T2[10], T3[10], : Entiers
Début
Pour (i ← 0 à 9 pas 1) Faire
Ecrire ("Entrer la valeur n° ", i+1, " de T1 : ") ;
Lire (T1[i]) ;
Ecrire ("Entrer la valeur n° ", i+1, " de T2 : ") ;
Lire (T2[i]) ;
FinPour
Pour (i ← 0 à 9 pas 1) Faire
T3[i] T1[i] + T2[i];
FinPour
Fin
Exercices
Écrire un algorithme qui effectue le produit scalaire
de deux vecteurs de même taille (3 éléments)
représentés par des tableaux a une dimension.
Algorithme ProduitScalaire
Variables
i, PS: Entier
U[3], V[3], : Entiers
Début
Pour (i ← 0 à 2 pas 1) Faire
Ecrire ("Entrer la valeur n° ", i+1, " de la vecteur U : ") ;
Lire (U[i]) ;
Ecrire ("Entrer la valeur n° ", i+1, " de la vecteur V : ") ;
Lire (V[i]) ;
FinPour
PS ← 0;
Pour (i ← 0 à 2 pas 1) Faire
PS PS + U[i] * V[i];
FinPour
Ecrire ("Le produit scalaire des deux vecteurs est : ", PS);
Fin
Exercices
Ecrire un algorithme qui demande à l’utilisateur de saisir 10
entiers, qui devront être stockées dans un tableau. Ensuite on
redemande à l’utilisateur de saisir un entier n. L’objectif étant de
chercher l’existence du nombre n dans le tableau, le résultat va
s’afficher comme suit:
• Si n se trouve dans le tableau : " n se trouve dans le tableau "
• Sinon : " n ne se trouve pas dans le tableau "
Algorithme Existence
Variables
i, n, v: Entiers
T[10] : Entier
Début
Pour (i ← 0 à 9 pas 1) Faire
Ecrire ("Entrer la valeur numéro : ", i+1) ;
Lire (T[i]) ;
FinPour
Ecrire ("Entrer la valeur de n : ") ;
Lire (n) ;
v 0;
Pour (i ← 0 à 9 pas 1) Faire
Si (T[i]=n) Alors
v 1;
FinSI
FinPour
Si (v = 1) Alors
Ecrire (n," se trouve dans le tableau ");
Sinon
Ecrire (n, " ne se trouve pas dans le tableau ");
FinSi
Fin
Exercices
Ecrire un algorithme qui demande à l’utilisateur de saisir 50
entiers, qui devront être stockées dans un tableau. Ensuite on
redemande à l’utilisateur de saisir un entier n. L’algorithme doit
calculer le nombre d’occurrence de n dans le tableau.
Algorithme NbrOccurrence
Variables
i, n, v: Entiers
T[50] : Entier
Début
Pour (i ← 0 à 49 pas 1) Faire
Ecrire ("Entrer l’élément numéro : ", i+1) ;
Lire (T[i]) ;
FinPour
Ecrire ("Entrer la valeur de n : ") ;
Lire (n) ;
v 0;
Pour (i ← 0 à 49 pas 1) Faire
Si (T[i]=n) Alors
v v+1;
FinPour
Ecrire (" Le nombre d’occurrence de ", n," dans le tableau est : ", v);
Fin
Exercices
Écrire un algorithme qui compte le nombre d'éléments pairs et
impaires dans un tableau.
Algorithme Paires_Impaires
Variables
i, Cp, Cimp : Entiers
T[10] : Entier
Début
Pour (i ← 0 à 9 pas 1) Faire
Ecrire ("Entrer la valeur numéro : ", i+1) ;
Lire (T[i]) ;
FinPour
CPos 0;
CNeg 0;
Pour (i ← 0 à 9 pas 1) Faire
Si (T[i] Mod 2 = 0) Alors
Cp Cp+1;
Sinon
Cimp Cimp+1;
FinSi
FinPour
Ecrire ("Le nombre d’éléments paires est : ", Cp);
Ecrire ("Le nombre d’éléments impaires est : ", Cimp);
Fin
Exercices
Écrire un algorithme qui supprime la première occurrence d'un
élément donné dans un tableau à une seule dimension.
Algorithme Suppression
Variables
i, n, v: Entiers
T[10] : Entier
Début
Ecrire ("Entrer la valeur de n : ") ;
Lire (n) ;
Pour (i ← 0 à 9 pas 1) Faire
Si (T[i]=n) Alors
Pour (j ← i à 8 pas 1) Faire
T[j] = T[j+1];
FinPour
FinSI
FinPour
T[9] ← 0;
Fin
Exercices
Ecrire un algorithme qui permet de saisir un nombre quelconque
de valeurs, et qui les range au fur et à mesure dans un tableau.
Le programme, une fois la saisie terminée, doit effectuer une
permutation circulaire de ses valeurs : chaque élément doit
prendre la valeur du suivant, sauf le dernier qui prend la valeur
du premier.
Algorithme Permutation_Circulaire
Variables
i, Temp: Entiers
T[10] : Entier
Début
Pour (i ← 0 à 9 pas 1) Faire
Ecrire ("Entrer l’élément numéro : ", i+1) ;
Lire (T[i]) ;
FinPour
Temp T[0];
Pour (i ← 0 à 8 pas 1) Faire
T[i] T[i + 1] ;
FinPour
T[9] Temp;
Fin
Exercices
Ecrire un algorithme qui permet de saisir un nombre quelconque de
valeurs, et qui les range au fur et à mesure dans un tableau. Le
programme, une fois la saisie terminée, doit dire si les éléments du
tableau sont tous consécutifs ou non.
Par exemple, si le tableau est: 12-13-14-15-16-17-18, ses éléments sont
tous consécutifs. Si le tableau est: 9-10-11-15-16-17, ses éléments ne
sont pas tous consécutifs.
Algorithme TableauConsécutif
Variables
i , N, T[100] : Entiers
Début
Ecrire ("Donner la taille du tableau : ") ;
Lire (N) ;
Pour (i 0 à N-1 pas 1) Faire
Ecrire ("Entrez le nombre n° ", i+1 , " : ") ;
Lire (T[i]) ;
FinPour
i ← 1;
TantQue ( (T[i] = T[i – 1] + 1) ET (i < N) )
i←i+1;
FinTq
Si (i=N) Alors
Ecrire ("Les nombres sont consécutifs") ;
Sinon
Ecrire ("Les nombres ne sont pas consécutifs");
FinSi
Fin
Exercices
La suite Un de Fibonacci est définie par :
U0 = 0, U1 = 1, et ꓯ n > 1 Un = Un-1 + Un-2
Les termes de la suite sont faciles à calculer (à partir du troisième terme, un
terme est la somme des deux précédents) : 0, 1, 1, 2, 3, 5, 8, 13, 21, 34 ...
Ecrire un algorithme qui permet de calculer et d’afficher la suite de
fibonacci pour un n donné.
Tableau à une dimension
Algorithme Suite_Fibonicci
Var i , N, T[100] : Entiers
Début
Ecrire ("Donner la taille du tableau : ") ;
Lire (N) ;
T[0]=1;
T[1]=1;
Pour (i ← 2 à N-1 pas 1 ) Faire
T[i] = T[i-1] + T[i-2] ;
FinPour
Ecrire (" Le " , n , "ème nombre de fibonacci = " , T[ i ]) ;
Fin
Exercices
Écrire un algorithme qui inverse l'ordre des éléments d'un
tableau à une seule dimension.
Algorithme InvererTableau
Variables
i, debut, fin, tmp: Entiers
T[10] : Entier
Début
debut 0 ;
fin 9 ;
Tant que (debut<fin) Faire
tmp = T[debut];
T[debut] = T[fin];
T[fin] = tmp;
debut début+1;
fin fin – 1;
FinPour
Fin
Algorithme InvererTableau
Variables
i, debut, fin, tmp: Entiers
T[10] : Entier
Début
debut 0 ;
fin 9 ;
Pour (i 0 à 10/2 pas 1) Faire
tmp T[i] ;
T[i] T[9 - i] ;
T[9 - i] tmp ;
FinPour
Fin