CORRIGES

EXERCICE I:

1-pttc =5x7500x (1 + 7/100) =40125

2-Cet algorithme calcule et affiche le prix toutes taxes comprises d’un article en fonction de la quantité, du prix hors taxe et de la tva

3-Calcul_pttc

EXERCICE II:

1. a-Longueur L, largeur l

b-Multiplier la longueur par la largeur (L * l)

c-Surface (S)

2.

Objet	Type/Nature	Rôle
L	Réel	Longueur de la parcelle
l	Réel	Largeur de la parcelle
S	Réel	Surface de la parcelle

3.

Algorithme surfaceRectangle

Var L, l: Réel;

Début

Écrire ("Entrer la longueur du rectangle :") ; Lire (L);

Écrire ("Entrer la largeur du rectangle :") ; Lire (l);

S ß L x l;

Écrire ("La surface du rectangle est :", S) ;

FinAlgo

EXERCICE III:

1.

Objet	Type/Nature	Rôle
g	Constante=9,8	Intensité de la pesanteur
m	Réel	Masse de l’objet
K	Réel	Raideur du ressort
Δl	Réel	Allongement du ressort

2. Const g=9,8;

Var m, k, Δl: reels;

3. Algorithme AllongementRessort

Const g=9,8;

Var m, k, Δl: réels;

Début

Ecrire (“Donner la valeur de la masse m:”), Lire(m);

Ecrire (‘’Donner la valeur de la raideur K:‘’), Lire(K);

Δl ← m*g/K;

Ecrire (‘’L’allongement du ressort est:‘’, Δl);

Fin

EXERCICES IV

1.Algorithme SurfaceCercle

Const Pi = 3,14;

Var R, S: réels;

Début

LIRE (R);

S ← R*R*Pi;

ECRIRE (’’La surface de ce cercle est‘’: S);

Fin

2.Algorithme ElèveAuCarré

Var unNombre, sonCarré: entiers;

Début

Ecrire (‘’Quel nombre voulez-vous élever au carré?‘’);

Lire (unNombre);

Son Carré ← unNombre*unNombre;

Ecrire (‘’Le carré de‘’, unNombre);

Ecrire (‘’c’est‘’, sonCarré);

Fin

2. Algorithme FaitLeTotal

Var nbVal, cpt: entiers;

Valeur, totalValeurs: réels;

Début

Ecrire (‘’Combien de valeurs voulez-vous saisir?‘’);

Lire (nbVal);

totalValeurs ← 0;

Pour cpt ← 1 à nbVal Faire

Ecrire (‘’Donnez une valeur‘’);

Lire (valeur);

totalValeurs ← totalValeurs + valeur;

Fin Pour

Ecrire (‘’Le total des», nbVal,»valeurs est‘’);

Fin

3-Algorithme ParExemple

Constante: (TVA : réel) ← 20,6;

(titre: chaine) ← Resultat;

Variable prix HT, prixTTC: réels;

Début

Ecrire (‘’Donnez-moi le prix hors taxes;‘’);

Lire (prixHT);

prixTTC ← prixHT*(1+ TVA/100);

Ecrire (titre) ;

Ecrire (prixHT,”FCFA HT devient”, prixTTC, “euros TTC) ;

Fin

4.Algorithme DivisionEuclidienne

// Cet algorithme permet de calculer puis d’afficher le quotient et le reste de la division

Euclidienne de deux variables A par B //

Variables A, B: entiers;

Début

Ecrire ("A = "), Lire(A);

Ecrire ("B = "), Lire(B);

q← A DIV B

r← A MOD B

Ecrire (« Le quotient est ", q, " et le reste est ", r)

Fin