1. Enoncé
Calcul du PGCD de 2 nombres entrés par l'utilisateur.
Le PGCD est le Plus Grand Commun Diviseur, notion de mathématique assez classique.
2. Versions
Cliquez sur " " pour afficher/masquer le code |
Tout afficher/Tout masquer
| | | | |
 |  |  |
|
Algorithme |
 |
|
 |
 |
debut
reste <-- 1
ecrire (' N1= ')
lire (n1)
ecrire (' N2= ')
lire (n2)
dividende <-- n1
diviseur <-- n2
tant que reste <> 0 faire
reste <-- dividende mod diviseur
dividende <-- diviseur
diviseur <-- reste
fin tant que
ecrire (' Le PGCD de ',n1,' et ',n2,' est ',dividende)
fin
|
|
 |  |  |
|
Pascal |
 |
|
 |
 |
program exo9;
var
reste,n1,n2,dividende,diviseur:integer;
begin
reste := 1;
write (' N1= ');
readln (n1);
write (' N2= ');
readln (n2);
dividende := n1;
diviseur := n2;
while reste <> 0 do begin
reste := dividende mod diviseur;
dividende := diviseur;
diviseur := reste
end;
writeln (' Le PGCD de ',n1,' et ',n2,' est ',dividende);
end.
|
|
 |  |  |
|
C |
 |
|
 |
 |
#include <stdio.h>
void main()
{
int reste;
int n1,n2,dividende,diviseur;
reste = 1;
printf (" N1= ");
scanf ("%d", &n1);
printf (" N2= ");
scanf ("%d", &n2);
dividende=n1;
diviseur=n2;
while (reste!=0) {
reste=dividende%diviseur;
dividende=diviseur;
diviseur=reste;
}
printf (" Le PGCD de %d et %d est %d",n1,n2,dividende);
}
|
|
|