Algorithme d'Euclide ,PGCD (en C)

[invite2c7e2526]

Bonsoir
pourriez-vous me corriger cet algorithme d'Euclide (PGCD) ?

Algorithme PGCD;
Var A, B : réel;
      m, r : entier;
Debut
  Ecrire("Introduisez deux nombres: ");
  Lire(A, B);
  Si (B=0) alors
     debut
       Ecrire ("Erreur de saisie");
      fin;
   Sinon
      debut
         Si (A=B) alors
           debut
             Ecrire("PGCD(", A, ";", B, ")=", A);
           fin;
        Sinon
          debut
             si (A mod B) alors
               debut
                 Ecrire("PGCD(",A, ";", B , ")=", B);
                fin;
             Sinon
               debut
                 Repeter
                    debut
                     r <--- (A mod B);
                     A <--- B;
                     B <--- r;
                     m <--- (A mod B);
                     fin;
                 jusqu'à (m=0)
               Ecrire ("PGCD(", A, ";", B, ")=", B);
             fin;
           fin;
        fin;
FIN.

Voilà, je vous remercie d'avance pour votre réponse et votre aide !
-----

[invite2d7144a7]

Bonjour,

Je n'ai pas pris la peine de lire jusqu'au bout, car quand on écrit un algorithme "en français", on prend la peine de préciser à qui correspondent les lignes fin;.

exemple

Si (B=0) alors
debut
Ecrire ("Erreur de saisie");
fin;

devrait être écrit

Si (B=0) alors
debut
Ecrire ("Erreur de saisie");
fin Si (B=0) alors;

Ça devient tout de suite beaucoup plus clair.

[invite2c7e2526]

Merci pour votre réponse,
vous avez raison, j'aimerais bien le rendre plus lisible comme le votre, mais je ne sais pas quel code utiliser, pourriez-vous m'aider svp ?

[Jack]

Merci pour votre réponse,
vous avez raison, j'aimerais bien le rendre plus lisible comme le votre, mais je ne sais pas quel code utiliser, pourriez-vous m'aider svp ?

Il suffit d'ajouter les balises code comme je viens de le faire: à al main ou le bouton # dans l'éditeur avancé.

[A voir en vidéo sur Futura]

[Jack]

si (A mod B) alors

l'expression derrieère un "SI" doit être un booléen et doit donc être vraie ou fausse alors que A mod B rend un entier. Tu n'aurais rien oublié?

[invite2c7e2526]

Merci beaucoup Jack pour votre aide ,
c'est vrai, je voulais dire : Si (A mod B =0) alors
SVP, mon algorithme est-il correct ?

[Jack]

Pourquoi n'essaies-tu pas: tu prends une feuille, un crayon de paier et une gomme et tu exécute ton programme instruction apreès instruction comme le ferait l'ordinateur.

[invite2c7e2526]

Voilà:
1er cas: B=0
Introduisez deux nombres:
1
0
Erreur de saisie

2ème cas: A=B
Introduisez 2 nombres:
2
2
PGCD(2;2)=2

3ème cas : A =/= B et A mod B = 0
Introduisez deux nombres:
4
2
PGCD(4;2)=2

4ème cas: A =/= B et A mod B =/= 0
Introduisez deux nombres:
7
5
r <--- 2 (7 mod 5)
A<--- 5
B<---2
m<--- 1 (5 mod 2)
m= 1 =/= 0

r<--- 1 (5 mod 2)
A<--- 2
B<---1
m<--- 0 (2 mod 1)
m=0 (donc il sort de la boucle Repeter)
PGCD(7;5)=1

[Jack]

Et quel est le problème dans ces résultats?

[invite2c7e2526]

mon problème c'est que je cherche juste à me dire si mon exercice est correct? Merci d'avance!

[Jack]

Ton code est un peu trop compliqué à mon gout, mais il me semble qu'il sort les bonnes valeurs.

[invite2c7e2526]

Merci beaucoup..De me rassurez que mon exercice est correct