Discussion :

[Matheux14]

Bonjour,

Écrire un module permettant d'ajouter dans une liste doublement chainée après une position donnée.

Code Algorithme :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
PROCEDURE AjouterApresPos ((E/S) tete : liste ; queue : liste ; pos : entier)
 
VARIABLE
 
P ; r : liste
 
i : entier
 
DEBUT 
 
       P <-- tete
 
    Tantque P =! pos et P =! NIL Faire 
 
          i <-- i + 1
    Fintantque
 
         Allouer(r)
 
         Lire(r^.info)
 
         r^.suivant <--

Je n'arrive pas à traduire ma simulation et faire intervenir la queue.

Alors ce serait super, si vous vouliez m'aider.

Merci d'avance.

[tbc92]

Tu écris un peu n'importe quoi au hasard. Ce n'est pas comme ça qu'on programme.

Tu as ces 3 lignes :

Code :

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

1
2
3
Tantque P =! pos et P =! NIL Faire 
    i <-- i + 1
Fintantque

Est-ce que tu vois pourquoi ce bloc de 3 lignes est catastrophique ?

Reprends les tout premiers cours que tu as eus, au collège peut-être. Relis les.

[Matheux14]

Ok, je vais d'abord le faire pour une liste simplement chainée et ensuite vous pourriez me guider sur la liste doublement chainée.

Code Algorithme :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
PROCEDURE Ajout ((E/S) tete : liste)
 
                             VARIABLE
 
                               P : liste
 
DEBUT
 
        Allouer(P)
 
        Lire(P^.info)
 
         P^.suivant <-- tete
 
         tete <-- P
 
FIN

[Matheux14]

Vous êtes là ?

[Matheux14]

Code Algorithme :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
PROCEDURE AjouterApresPos Liste doublement chainée ((E/S) liste, queue : liste ; Pos : Variant)
 
 
                              VARIABLES
 
                              P, r : Liste
 
                              i : entier
 
 DEBUT
 
                            P ← tete
 
                            i ← 1
 
                       Tantque P<> Nil et i <> Pos Faire
 
                           P ← P^.suivant
 
                            i ← i +1
 
                       Fintantque
 
                       Si P^.suivant <> Nil alors
 
                           Allouer(r)
 
                           Lire(r^.info)
 
                           r^.precedent ← P
 
                           r^.suivant ← P^.suivant
 
                           P^.suivant ← r
 
                          P^.suivant^.suivant ← r
 
                     Sinon
 
                          AjoutEnQueue (Queue)
 
                     Finsi
 
 FIN

[tbc92]

Gros progrès.
Les 2 premiers messages valaient 0 sur 20, et là, on est proche de la moyenne.

Je remplacerais le mot suivant par précédent ... une fois. Je te laisse trouver où.

Et à la fin, tu as recopié un truc trouvé quelque part : AjoutEnQueue(Queue)
Il faut effectivement traiter ce cas, mais tu ne le fais pas.

Dans ton tout premier message, la ligne d'entête disait : PROCEDURE AjouterApresPos ((E/S) tete : liste ; queue : liste ; pos : entier)Maintenant, c'est PROCEDURE AjouterApresPos Liste doublement chainée ((E/S) liste, queue : liste ; Pos : Variant)Tu sais expliquer/justifier les changements ?