Forum

Catégorie : Programmes
Forum : Aide à la programmation | Archives
Vues : 949
Réponses : 5
Type : discussion
Statut : réglé
Etat : clos

Questions Algorithme de Syracuse

Ryuu le 07/10/2009 à 20:56
Bonjour, je suis nouveau godgrace.gif et j'ai écris (à ma "façon") l'algorithme de Syracuse :
Code
:EffEcr
:Disp "ENTRER N"
:Input N
:While N>1
:If partDéc(N/2)=0
:Then
:N/2->N
:Else
:3*N+1->N
:End
:Disp N
:Pause
:End


Et j'aimerais savoir comment faire pour afficher le nombre de valeurs obtenues et en afficher la plus grande.

Pouvez-vous m'aidez ???
Ryuu le 08/10/2009 à 21:21
Quelqu'un ? SVP ?
Wirekey le 09/10/2009 à 19:05
C'est quoi l'algo de syracuse ??

Peut être rentre les résultats dans un liste ... Et ensuite SECONDE STAT MATH Max(....
sypotu le 09/10/2009 à 22:54
je crois avoir trouvé, c'est ça ?
sypotu le 09/10/2009 à 23:07
J'essaierais ça : (non testé)

Code
:EffEcr
:1->A
:Disp "ENTRER N"
:Input N
:While N>1
:A->dim(Liste1
:If partDéc(N/2)=0
:Then
:N/2->N
:Else
:3*N+1->N
:End
:Disp N
:N->Liste1(A
:A+1->A
:Pause
:End
:Disp "max :",max(Liste1
:Disp "nb de valeurs :", A
:Pause
Ryuu le 13/10/2009 à 09:20
Ouais, ça marche, merci beaucoup cupsmiley.gif bigmouth.gif cupsmiley.gif