CORRIGES

EXERCICE I :

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

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