1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.
Dismiss Notice
Welcome to our Education website, plz like our page facebook to support us. Thank You and wish you good navigation

Structure séquentielle et conditionnelle (Algorithmique)

abdelouafiDec 18, 2016

    1. abdelouafi

      abdelouafi Administrator Staff Member

      Messages:
      295
      Likes Received:
      9
      Trophy Points:
      18
      Joined
      Sep 13, 2016
      Exercice 1:

      Ecrire un algorithme qui calcule le périmètre d'un rectangle?


      Exercice 2:

      Ecrire un algorithme qui permet la décomposition d'une somme d'argent (s) en nombre de billets de 100, 50, 10 et en pièces de 5 et 1 dh ?


      Exercice 3:

      Ecrire un algorithme qui permet de résoudre l'équation ax+b=0?


      Exercice 4:

      Ecrire un algorithme qui permet de résoudre l'équation ax²+bx+c=0?



      Exercice 5:

      Ecrire un algorithme qui permet de déterminer le plus grand de deux nombres?

      Exercice 6:

      Ecrire un algorithme qui permet de calculer la moyenne de trois notes, puis qui affiche "Admis" si la moyenne est supérieure à 10, et affiche "Non Admis" dans le cas contraire ?


      Correction:

      Exercice 1:

      Code:
      Algorithme périmètres;
      
      variables a,b,p : Réel;
      
      Debut
      
        Ecrire(" Donnez la longueur du rectangle ");
      
        Lire(a);
      
        Ecrire(" Donnez la largueur du rectangle ");
      
        Lire(b);
      
        P  <---- 2 * (a+b);
      
        Ecrire("le résultat est ", P);
      
      Fin.[CODE][/COLOR]
      

      Exercice 2:

      Code:
      
      [COLOR=#59b300][CODE]Algorithme decomposition;
      
      variables n100, n50, p5, n10, p1, r1,s : Entier;
      
      Debut
      
        Ecrire(" Donnez la somme d'argent ");
      
        Lire(s);
      
        n100 <---- s Div 100;
      
      r1 <---- s MOD 100;
      
      n50 <---- r1 DIV 50;
      
      r1 <---r1 MOD 50;
      
      n10 <---r1 DIV 10;
      
      r1 <--- r1 MOD 10;
      
      p5 <--- r1 DIV 5;
      
      p1 <--- r1 MOD 5;
      
      Ecrire("nombre de billet de 100= ", n100);
      
      Ecrire("nombre de billet de 50= ", n50);
      
      Ecrire("nombre de billet de 10= ", n10);
      
      Ecrire("nombre de pièces de 5 = ", p5);
      
      Ecrire("nombre de pièces de1= ", p1);
      
      Fin.[CODE][/COLOR]
      


      Exercice 3:

      Code:
      [COLOR=#59b300][CODE]Algorithme equation;
      
      variables a,b,x: Réel;
      
      Debut
      
        Ecrire(" Donnez a ");
      
        Lire(a);
      
        Ecrire(" Donnez b ");
      
        Lire(b);
      
      si ( b <>0) Alors
      
        debut
      
        x <--- -b / a ;
      
        Ecrire (x);
      
        Fin
      
      Sinon
      
        Ecrire("pas de résultat ");
      
      Fin.[/COLOR]
      


      Exercice 4:

      Code:
      [COLOR=#59b300][CODE]Algorithme equation;
      
      variables a,b,c,x,x1,d: Réel;
      
      Debut
      
        Ecrire(" Donnez a ");
      
        Lire(a);
      
        Ecrire(" Donnez b ");
      
        Lire(b);
      
      Ecrire(" Donnez c ");
      
        Lire(c);
      
      d <-- b*b - 4*a*c ;
      
      si ( d<0) Alors
      
         Ecrire("pas de résultat ");
      
      Sinon
      
        si (d==0) alors
      
        Debut
      
           x <--- (-b) / (2*a);
      
        Ecrire (x);
      
      Else
      
        Debut
      
        x <--- (-b-sqrt(d)) /(2*a);
      
        x <---(-b+sqrt(a))/(2*a);
      
        Ecrire (x,x1);
      
        Fin
      
      Fin.[/COLOR]


      Exercice 5:

      Code:
      [COLOR=#59b300][CODE]Algorithme test;
      
      variables a,b: Réel;
      
      Debut
      
        Ecrire(" Donnez a ");
      
        Lire(a);
      
        Ecrire(" Donnez b ");
      
        Lire(b);
      
      si ( b >a) Alors
      
        Ecrire (b, " est plus grand que ", a);
      
        Sinon
      
        Ecrire (a, " est plus grand que ", b);
      
      Fin.[/COLOR]



      Exercice 6:

      Code:
      [COLOR=#59b300][CODE]Algorithme moyenne;
      
      variables a,b,c,moy: Réel;
      
      Debut
      
        Ecrire(" Donnez a ");
      
        Lire(a);
      
        Ecrire(" Donnez b ");
      
        Lire(b);
      
      Ecrire(" Donnez c ");
      
        Lire(c);
      
      mot <-- (a+b+c)/3 ;
      
      si ( moy>10) Alors
      
          Ecrire("Admis ");
      
      Sinon
      
        Ecrire("Non Admis ");
      
      Fin.[/COLOR]
       
      Last edited: Dec 23, 2016
      Loading...
      Correction:

      Exercice 1:

      Code:
      Algorithme périmètres;
      
      variables a,b,p : Réel;
      
      Debut
      
        Ecrire(" Donnez la longueur du rectangle ");
      
        Lire(a);
      
        Ecrire(" Donnez la largueur du rectangle ");
      
        Lire(b);
      
        P  <---- 2 * (a+b);
      
        Ecrire("le résultat est ", P);
      
      Fin.



      Exercice 2:

      Code:
      Algorithme decomposition;
      
      variables n100, n50, p5, n10, p1, r1,s : Entier;
      
      Debut
      
        Ecrire(" Donnez la somme d'argent ");
      
        Lire(s);
      
        n100 <---- s Div 100;
      
      r1 <---- s MOD 100;
      
      n50 <---- r1 DIV 50;
      
      r1 <---r1 MOD 50;
      
      n10 <---r1 DIV 10;
      
      r1 <--- r1 MOD 10;
      
      p5 <--- r1 DIV 5;
      
      p1 <--- r1 MOD 5;
      
      Ecrire("nombre de billet de 100= ", n100);
      
      Ecrire("nombre de billet de 50= ", n50);
      
      Ecrire("nombre de billet de 10= ", n10);
      
      Ecrire("nombre de pièces de 5 = ", p5);
      
      Ecrire("nombre de pièces de1= ", p1);
      
      Fin.



      Exercice 3:

      Code:
      Algorithme equation;
      
      variables a,b,x: Réel;
      
      Debut
      
        Ecrire(" Donnez a ");
      
        Lire(a);
      
        Ecrire(" Donnez b ");
      
        Lire(b);
      
      si ( b <>0) Alors
      
        debut
      
        x <--- -b / a ;
      
        Ecrire (x);
      
        Fin
      
      Sinon
      
        Ecrire("pas de résultat ");
      
      Fin.


      Exercice 4:

      Code:
      Algorithme equation;
      
      variables a,b,c,x,x1,d: Réel;
      
      Debut
      
        Ecrire(" Donnez a ");
      
        Lire(a);
      
        Ecrire(" Donnez b ");
      
        Lire(b);
      
      Ecrire(" Donnez c ");
      
        Lire(c);
      
      d <-- b*b - 4*a*c ;
      
      si ( d<0) Alors
      
         Ecrire("pas de résultat ");
      
      Sinon
      
        si (d==0) alors
      
        Debut
      
           x <--- (-b) / (2*a);
      
        Ecrire (x);
      
      Else
      
        Debut
      
        x <--- (-b-sqrt(d)) /(2*a);
      
        x <---(-b+sqrt(a))/(2*a);
      
        Ecrire (x,x1);
      
        Fin
      
      Fin.


      Exercice 5:

      Code:
      Algorithme test;
      
      variables a,b: Réel;
      
      Debut
      
        Ecrire(" Donnez a ");
      
        Lire(a);
      
        Ecrire(" Donnez b ");
      
        Lire(b);
      
      si ( b >a) Alors
      
        Ecrire (b, " est plus grand que ", a);
      
        Sinon
      
        Ecrire (a, " est plus grand que ", b);
      
      Fin.



      Exercice 6:

      Code:
      Algorithme moyenne;
      
      variables a,b,c,moy: Réel;
      
      Debut
      
        Ecrire(" Donnez a ");
      
        Lire(a);
      
        Ecrire(" Donnez b ");
      
        Lire(b);
      
      Ecrire(" Donnez c ");
      
        Lire(c);
      
      mot <-- (a+b+c)/3 ;
      
      si ( moy>10) Alors
      
          Ecrire("Admis ");
      
      Sinon
      
        Ecrire("Non Admis ");
      
      Fin.

Share This Page

Share