td 4 les boucles[1]

Ecole Préparatoire en Sciences &Techniques d’Oran-EPSTO- 2012/2013
Semestre 2: Algorithmique & Programmation 1
ère
année

Résumé
Les structures itératives


Ecole Préparatoire en Sciences &Techniques d’Oran-EPSTO- 2012/2013
Semestre 2: Algorithmique & Programmation 1
ère
année

TD4
Les structures itératives

Exercice 1
Ecrire un algorithme permettant de calculer l’expression suivante :
en utilisant les boucles tant que, répéter et
pour.
Exercice 2
Ecrire un algorithme permettant de calculer par des soustractions successives le
quotient entier et le reste de la division entière de deux entiers entrés au clavier.
Exercice 3
Ecrire un algorithme permettant de calculer le nombre lu à rebours d'un nombre
positif entré au clavier en supposant que le fichier d'entrée standard contient une suite
de chiffres non nuls, terminée par zéro (Contrôlez s'il s'agit vraiment de chiffres).
Exemple: Entrée: 1 2 3 4 0 Affichage: 4321
Exercice 4
Ecrire un algorithme permettant de calculer pour une valeur X réelle la valeur
numérique d'un polynôme de degré n:
P(X) = AnXn + An-1Xn-1 + ... + A1X + A0
Les valeurs de n, des coefficients An, ... , A0 et de X seront entrées au clavier.
Utilisez le schéma de Horner qui évite les opérations d'exponentiation lors du
calcul:






Exercice 5
Ecrire un algorithme permettant de calculer le P.G.C.D. de deux entiers naturels
entrés au clavier.
Donner deux versions différentes d’algorithmes : 1 version avec les soustractions et
une autre version avec la méthode Euclidienne.
Ecole Préparatoire en Sciences &Techniques d’Oran-EPSTO- 2012/2013
Semestre 2: Algorithmique & Programmation 1
ère
année

SOLUTION FICHE 4


Exercice 1


































Ecole Préparatoire en Sciences &Techniques d’Oran-EPSTO- 2012/2013
Semestre 2: Algorithmique & Programmation 1
ère
année

Exercice 2

Algorithme DivisionEntiére
Variable
NUM : entier /* numérateur de la division entière */
DEN : entier /* dénominateur de la division entière */
DIV : entier /* résultat de la division entière */
RES : entier /* reste de la division entière */

debut
ecrire ("Introduisez le numérateur : ");
lire(NUM);
ecrire ("Introduisez le dénominateur : ");
lire(DEN);

RESNUM
DIV0
Tant que (RES>=DEN) faire
RESRES-DEN
DIVDIV+1
Fintq

Ecrire(NUM, "divisé par",DEN, " est", DIV,"reste", RES)
FIN.
























Ecole Préparatoire en Sciences &Techniques d’Oran-EPSTO- 2012/2013
Semestre 2: Algorithmique & Programmation 1
ère
année

Exercice 3

Algorithme CompteARebours
Variable X : entier /* Le chiffre courant */
N :entier /* Le compteur des décimales */
VALD : entier /* Valeur de la position décimale courante */
NOMB : entier /* Le nombre résultat */
Debut
N0
VALD 1
NOMB 0

Répéter
Ecrire ("Entrez un chiffre");
Lire (X);
Si (X<0 ou X>9) alors Ecrire ("ERREUR, Entrer des chiffres entre 0-9")

Sinon
Si (X>0 et X≤ 9) alors
NOMB  NOMB+VALD*X
NN+1
VALD VALD*10

Fsi
Fsi

jusqu’à (X=0)
Ecrire ("La valeur du nombre renversé est ", NOMB)

FIN.












Ecole Préparatoire en Sciences &Techniques d’Oran-EPSTO- 2012/2013
Semestre 2: Algorithmique & Programmation 1
ère
année

Exercice 4
Algorithme ValeurPolynome
Variable
N : entier /* degré du polynôme */
X : reel /* argument */
A : reel /* coefficients successifs du polynôme */
P : reel /* coefficient courant du terme Horner */
Debut

Ecrire("Entrer le degré N du polynôme : ");
Lire (N);
Ecrire("Entrer la valeur X de l'argument : ");
lire(X);

Pour (P de N à 0 par pas -1 ) faire
Ecrire ("Entrer le coefficient ")
Lire (A)
P  P*X + A
fpour

Ecrire ("Valeur du polynôme pour X =", X, "est égale à", P)
Fin.

























Ecole Préparatoire en Sciences &Techniques d’Oran-EPSTO- 2012/2013
Semestre 2: Algorithmique & Programmation 1
ère
année

Exercice 5

1ere Version
Algorithme PGCD
Variable A, B : entier /* données */
Debut
Repeter
Ecrire ("Entrer l'entier A (non nul) : ")
Lire (A)
Jusqu’à (A≠0)

Repeter
Ecrire ("Entrer l'entier B (non nul) : ");
lire(B)
jusqu’à (B≠0)

tant que (A≠ B) faire
Si (A>B) alors AA-B
Sinon BB-A
Fsi
finTQ

Ecrire ("Le PGCD = " ,A)
FIN

2éme Version

Algorithme PGCDEuclidienne
Variable
A, B,R : entier /* données */
Debut
Repeter
Ecrire ("Entrer l'entier A (non nul) : ")
Lire (A)
Jusqu’à (A≠0)
Repeter
Ecrire ("Entrer l'entier B (non nul) : ");
lire(B)
jusqu’à (B≠0)

Tant que (B≠ 0) faire
R  Amod B (ou R  A%B)
AB
VR
finTQ

Ecrire ("Le PGCD = " ,A)
FIN