Génération d'un tableau à partir de 2 autres.

Fusion de 2 tables triées par Jacques Boisgontier ( le basic et ses fichiers
Tome 2) éditions PSI 1982
Rendons à Césars ce qui appartient à Césars!
Dim A(20), B(20),C(40)
' SEQUENCE D'Essai
FOR I= 1 to 10 : A(I)=2*I : NEXT I
FOR I= 1 to 15 : B(I)=I : NEXT I
A(11)= 9999 :B(16) = 9999
I=1: J=1: K=1
CONTINU:
If A(I)™99 and B(J)™99 then end
IF A(I)<B(J) THEN C(K)=A(I) : I=I+1 : K=K+1 : GOTO CONTINU ELSE
IF B(J)<A(I) THEN C( K)= B ( J) :K=K+1 : J=J+1 : GOTO CONTINU ELSE
IF A(I)= B(J) THEN C(K)= A(I): K=K+1:I= I+1 :J=J+1 :GOTO CONTINU


"Stéphane L." <no@spam.fr> a écrit dans le message de
news:es0z4CjdEHA.2408@tk2msftngp13.phx.gbl...

Bonjour,

J'ai 2 tableaux triés par ordre alphabétique: T1 et T2.
Il me faut tous les T1 et tous les T2 uniques dans 1 3e tableau T3 trié.

Je cherche le moyen le plus rapide car si j'ai 8000 occurences dans T1 et
autant dans T2, c'est long.

Exemple 1 :
T1(1)="A"
T1(2)="B"
T1(3)="F"
et
T2(1)="A"
T2(2)="D"
donne
T3(1)="A"
T3(2)="B"
T3(3)="D"
T3(4)="F"

Exemple 2 :
T1(1)="A"
T1(2)="B"
T1(3)="F"
et
T2(1)="F"
T2(2)="G"
donne
T3(1)="A"
T3(2)="B"
T3(3)="F"
T3(4)="G"

Exemple 3 :
T1(1)="A"
T1(2)="B"
T1(3)="F"
et
T2(1)="A"
T2(2)="B"
donne
T3(1)="A"
T3(2)="B"
T3(3)="F"


Merci d'avance.

--
Cordialement,

Stéphane L

Merci Franck
Merci Jacques
Merci Césars

"franck" <frank@nomail.con> a écrit dans le message de
news:us7QE2kdEHA.1184@TK2MSFTNGP11.phx.gbl...

Fusion de 2 tables triées par Jacques Boisgontier ( le basic et ses

fichiers

Tome 2) éditions PSI 1982
Rendons à Césars ce qui appartient à Césars!
Dim A(20), B(20),C(40)
' SEQUENCE D'Essai
FOR I= 1 to 10 : A(I)=2*I : NEXT I
FOR I= 1 to 15 : B(I)=I : NEXT I
A(11)= 9999 :B(16) = 9999
I=1: J=1: K=1
CONTINU:
If A(I)™99 and B(J)™99 then end
IF A(I)<B(J) THEN C(K)=A(I) : I=I+1 : K=K+1 : GOTO CONTINU ELSE
IF B(J)<A(I) THEN C( K)= B ( J) :K=K+1 : J=J+1 : GOTO CONTINU ELSE
IF A(I)= B(J) THEN C(K)= A(I): K=K+1:I= I+1 :J=J+1 :GOTO CONTINU


"Stéphane L." <no@spam.fr> a écrit dans le message de
news:es0z4CjdEHA.2408@tk2msftngp13.phx.gbl...
> Bonjour,
>
> J'ai 2 tableaux triés par ordre alphabétique: T1 et T2.
> Il me faut tous les T1 et tous les T2 uniques dans 1 3e tableau T3 trié.
>
> Je cherche le moyen le plus rapide car si j'ai 8000 occurences dans T1

et

> autant dans T2, c'est long.
>
> Exemple 1 :
> T1(1)="A"
> T1(2)="B"
> T1(3)="F"
> et
> T2(1)="A"
> T2(2)="D"
> donne
> T3(1)="A"
> T3(2)="B"
> T3(3)="D"
> T3(4)="F"
>
> Exemple 2 :
> T1(1)="A"
> T1(2)="B"
> T1(3)="F"
> et
> T2(1)="F"
> T2(2)="G"
> donne
> T3(1)="A"
> T3(2)="B"
> T3(3)="F"
> T3(4)="G"
>
> Exemple 3 :
> T1(1)="A"
> T1(2)="B"
> T1(3)="F"
> et
> T2(1)="A"
> T2(2)="B"
> donne
> T3(1)="A"
> T3(2)="B"
> T3(3)="F"
>
>
> Merci d'avance.
>
> --
> Cordialement,
>
> Stéphane L
>
>

Re bonjour,

Dans le même genre,

J'ai besoin d'avoir 1 tableau T4 trié ne contenant que les données de T2 qui
ne sont pas dans T1.
Exemple 1 :
T1(1)="A"
T1(2)="B"
T1(3)="F"
et
T2(1)="A"
T2(2)="D"
donne
T3(1)="D"

Exemple 2 :
T1(1)="A"
T1(2)="B"
T1(3)="F"
et
T2(1)="F"
T2(2)="G"
donne
T3(1)="G"

Stéphane

"Stéphane L." <no@spam.fr> a écrit dans le message de
news:es0z4CjdEHA.2408@tk2msftngp13.phx.gbl...

Bonjour,

J'ai 2 tableaux triés par ordre alphabétique: T1 et T2.
Il me faut tous les T1 et tous les T2 uniques dans 1 3e tableau T3 trié.

Je cherche le moyen le plus rapide car si j'ai 8000 occurences dans T1 et
autant dans T2, c'est long.

Exemple 1 :
T1(1)="A"
T1(2)="B"
T1(3)="F"
et
T2(1)="A"
T2(2)="D"
donne
T3(1)="A"
T3(2)="B"
T3(3)="D"
T3(4)="F"

Exemple 2 :
T1(1)="A"
T1(2)="B"
T1(3)="F"
et
T2(1)="F"
T2(2)="G"
donne
T3(1)="A"
T3(2)="B"
T3(3)="F"
T3(4)="G"

Exemple 3 :
T1(1)="A"
T1(2)="B"
T1(3)="F"
et
T2(1)="A"
T2(2)="B"
donne
T3(1)="A"
T3(2)="B"
T3(3)="F"


Merci d'avance.

--
Cordialement,

Stéphane L