Discussion :

[ARCTURIAN]

Bonjour à tous et a toutes,
alors voila c'est ma première fois sur ce forum et je m'excuse par avance de poster ce sujet dans cette section, pour faire court je souhaiterais ecrire une fonction qui permettrait de calculer le PGCD de plusieurs nombres entiers.
voici ma tentative :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
fonction fctpgcd (a:entier, b:entier) entier
Variable n,div,i :entier
Debut
Si(a>b)alors
n<--b
Sinon
n<--a
Finsi
Pour i allant de 1 jusqu'a n
Si a%i=0 et b%i=0
div<--i
Finsi
Fin pour
retourne div

comme vous le voyez ce pseudo code ne fonctionne que pour 2 arguments, j'aimerai qu'il puisse marcher pour plusieurs entiers saisi par l'utilisateur
voila merci d'avance et encore une fois désolé pour le post ici

[Flodelarab]

Bonjour

Pourquoi n'appliques-tu pas le légendaire algorithme d'Euclide ?

[anapurna]

salut

si je comprend bien tu as une suite de nombre et tu cherche le diviseur commun de cette suite
effectivement les algorithme du PGCD ne compare que 2 nombre entier

mais pour trouver le PGCD d'une suite il suffit de faire

PGCD(PGCD(PGCD(A,B),C),...);