Discussion :

[valentin03]

Bonjour,
je coince sur un problème trivial.
A l'origine, j'ai un tableau de chaînes, disont donn$(x), tel que:

Code :

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
 
1 1 2
1 2 4
1 3 4
1 4 2
1 5 7
...
2 1 6
2 2 4
2 3 5
2 4 2
2 5 9
...
3 1 2
3 2 8
3 3 7
3 4 5
3 5 4
...
4 ... ect
... ect

Je veux éliminer les lignes commençant par "2".
J'ai réussi à les remplacer par "**".
Mais je n'arrive pas à supprimer les "**".
Et ça fait un sacré bon moment que je bataille (même avec un tableau provisoire)
Et ces chiennes de lignes: "**" sont toujours là.
Note: Le tableau n'a pas besoin de réarrangement, je voudrait juste que les "3 ..." collent aux: "1...".
Un bout de pseudo code serait le bienvenu.
A vot'non coeur...
D'avance merci.

[Flodelarab]

Bonjour

Code :

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
$ cat fichier.txt 
1 1 2
1 2 4
1 3 4
1 4 2
1 5 7
...
2 1 6
2 2 4
2 3 5
2 4 2
2 5 9
...
3 1 2
3 2 8
3 3 7
3 4 5
3 5 4
...
4 ... ect
... ect

Code :

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
$ sed '/^2/d;s/3 /3/' fichier.txt 
1 1 2
1 2 4
1 34
1 4 2
1 5 7
...
...
31 2
32 8
33 7
34 5
35 4
...
4 ... ect
... ect

[valentin03]

Cite: "$ sed '/^2/d;s/3 /3/' fichier.txt "
Hélas, mon langage ne permet pas une telle concision.
C'est pourquoi j'espère du pseudo-code.
Genre:
Pour x= 1 to fin
Si...alors...
.....
Fin si
Fin pour
Bref, de "l'universel", de l'Espéranto du code.

[tbc92]

Tu cherches un truc du genre :

Code :

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

1
2
3
pour x = 1 to n 
   traitement 
fin

Je t'invite à chercher dans une direction 'opposée' :

Code :

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

1
2
3
pour x = n to 2 pas -1 
  si   ... alors traitement
fin

Ce sera beaucoup plus simple.

[valentin03]

à: tbc92:
J'ai fait en avençant, en reculant, par secteurs
Et par d'autres moyens que la décense m'interdit de citer

[valentin03]

Suite du: 17h51
Pour préciser: J'ai les index de début et de fin de la séquence des "2": td et td+it.

[valentin03]

Suite du: 18h37
Je savait que c'était trivial, mais en fait c'est super trivial.
Il suffit de faire:

Code :

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

1
2
3
4
 
    for x=td to fin
      donn$(x)=donn$(x+it)
    next x

Fallait juste bien réfléchir, mais merci quand même.