Voila j'ai eu un sujet d'algo à faire mais je tourne en rond à propose d'un exo
Enoncé  
 
Soit la suite logique suivante:
1
1  1
2  1
1  2  1  1
1  1  1  2  2  1
3  1  2  2  1  1
 
(3 fois le nombre 1 puis 2 fois le nombre2 et 1 fois le nombre 1)
Ecrire l'algorithme qui permet de compléter cette suite.
 
Moi je suis arrivé à cela  
 
Algo Suite
 
VAR T:Tableau (1..6) de ent init {3,1,2,2,1,1}
      nb:ent
 
Début
 
Si T(1)!=T(2)  
    alors nb<-1
    Sinon Si T(1)!=T(3)
                alors nb<-2
                sinon Si T(1)!=T(4)
                            alors nb<-3
                            sinon Si T(1)!=T(5)
                                        alors nb<-4
                                        sinon Si T(1) !=T(6)
                                                    alors nb<-5
                                                    sinon nb<-6
                                                Fsi
                                    Fsi
                        Fsi
             Fsi
Fsi
Afficher (nb,T(1))
 
Cette méthode me permet d'afficher les premiers éléments de ma suite c'est à dire 1  3, je pensais donc faire une procédure avec  
mon enchainement de Si mais je bloque sur les paramètre vu qu'a chaque fois il n'y a pas le meme nombre de test.
De meme que si je fais un pour dans l'algo vu que si le nombre 1 est égal au nombre 2 par exemple lorsque ma première boucle sera fini  
la deuxième boucle commencera au 2.
 
JE remercie ceux qui pourront m'aider.
                             

J'aimerais apporter une petite modification
 
Ton tableau ok mais par contre c'est ton init qui va pas, on analyse une ligne a la fois donc dans ton init => 1, 1, 1 (2 premieres lignes que l'on pourra comparer par la suite)
Il te manque une boucle pour faire n nombre de ligne
Sympa tes si imbriqués mais si tu fait 1000 lignes? "nb" va donner une valeur fausse. La fonction s'impose.
 
Moi c'est le tableau qui me bloque! Je ne sait pas si on peut modifier le nombre de cases d'un tableau...

Juste un indice : essaie d'une part d'écrire ton algorithme en supposant que tu ne connais pas à priori le tableau, ni sa taille (autrement dit, le tableau ne fait pas 6 cases, mais n), et d'autre part d'utiliser les boucles (tu écris !=T(1), !=T(2), !=T(3)... il doit bien y avoir moyen d'automatiser ça !).

Pas d'enchaînements de "Si", un accumulateur (pour compter le nombre actuel) et une mémoire (pour mémoriser le nombre actuel)

C'est rigolo à faire
 
http://magicweb.manga-torii.com/suite.htm
 
Faut pas mettre plus de 40, parceque c'est un peu exponentiel la taille de la ligne...

Dans l'autre sens aussi ça marche

je l'avais fait en PHP, c'est très marrant au bout d'un moment

Ben surtout ça a bloqué mon 3500+ pendant 10 minutes quand j'ai demandé 100 itérations

Juste pour le fun, une version Caml :

Bon par contre ce n'est pas du tout optimisé, et la pile prend très très cher : au delà de la ligne 39, l'interpretteur déclare forfait... ^_^;

et dire que des gens osent dire qu'un langage évolué c'est plus simple que de l'ASM

oui bon on aura compris que c'est trivial comme machin

 
Ton lien marche pas par contre ton site marche ^^

le www c'est normal qu'il marche, il est pas chez moi
 
par contre, chelou que mon lien ne marche pas
 
alice qui fait encore des siennes ça
 
déjà que la télé marche plus

Ha ben nan, c'est mon mot de passe chez ZoneEdit qui avait expiré à priori
 
Ca devrait revenir d'ici quelques minutes

j'aurais bien vu du récursif...

pkoi utiliser du récusif quand une boucle suffit ?

pour s'amuser

tiens au fait tu peux me dire si mon lien remarche ?

@trevor : mon exemple était en récursif. Bon par contre il n'y a pas de récursion terminale, il faudrait que je le modifie...
 
@Arjuna : par goût de l'écriture fonctionnelle ! :-) A part ça ton lien ne marche toujours pas.

 
non, tjs pas...

 
celui en caml ? j'ai pas regardé, je ne connais absolument rien à ce langage
mais je te crois
et c'est plutôt une bonne idée

relou.
 
bon, reste plus qu'à voir ce qu'il se passe

J'ai pas tout à fait passé les deux heures et demies à paramètrer ma AliceBox, mais pas loin
 
Quelle merde cette daube !
 
Après un reboot : elle perd toutes les règles NAT
Si je colle une IP en "DMZ" (vers mon routeur interne) non seulement elle l'oublie, mais la TV marche plus
Si je boote cette daube alors qu'elle est branchée sur mon routeur, elle marche plus !
 

 
Z'avez déjà vu ça vous ?
Faut que j'éteigne le modem. Que je le branche à un PC, que je l'allume, puis une fois la séquence de démarrage terminée (ça dure pas loin de 5 minutes sur cette daube), je la débranche du PC pour la coller sur le routeur ! Et là, ça marche... On croit rêver
 
(désolé pour ce petit HS, mais là c'est du tip top ça...)

Il y a eu Caml, pourquoi pas du Prolog :  
 

 
Appel par suite([1]).

C'est quoi ce langage ??? lol

Pro(grammation)Log(ique)
Plus de détails ici