OVH Cloud OVH Cloud

algorithme pour combinaison de lettres

15 réponses
Avatar
yann
je cherche un alogrithme pour afficher une combinaison
de lettres, par exemple, lorsqu' un utilisateur tape un
mot "FJK" ou même plus, il faut que mon programme soit capable d'afficher la
combinaison de façon suivante :
F
J
K
FJ
FJK
JK

merci d'avance

yann

10 réponses

1 2
Avatar
David
Bonjour Yann,

Un début de réponse :

http://vbfrance.fr/code.aspx?idf81

a+
Jean-Pol DAVID
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ?
"yann" a écrit dans le message de news:
4299bef9$0$10050$
je cherche un alogrithme pour afficher une combinaison
de lettres, par exemple, lorsqu' un utilisateur tape un
mot "FJK" ou même plus, il faut que mon programme soit capable d'afficher


la
combinaison de façon suivante :
F
J
K
FJ
FJK
JK

merci d'avance

yann





Avatar
WinSysBee Support
Aurais tu un autre exemple plus long de cette suite?

"David" wrote in message
news:%
Bonjour Yann,

Un début de réponse :

http://vbfrance.fr/code.aspx?idf81

a+
Jean-Pol DAVID
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ?
"yann" a écrit dans le message de news:
4299bef9$0$10050$
je cherche un alogrithme pour afficher une combinaison
de lettres, par exemple, lorsqu' un utilisateur tape un
mot "FJK" ou même plus, il faut que mon programme soit capable d'afficher


la
combinaison de façon suivante :
F
J
K
FJ
FJK
JK

merci d'avance

yann









Avatar
andre.araste
Bonjour

Oui, je possède un programme qui affiche les anagrammes des mots de 2 à 8
lettres.

Ainsi le mot FJK présente 6 combinaisons possibles.

Ledit programme est ancien et fonctionne sous DOS

??
--
Bonne réception.

http://perso.wanadoo.fr/andre.araste/
Membre du Club Win's: http://www.clubwins.org
Avertissement: Je ne vends rien.



"yann" a écrit dans le message de news:
4299bef9$0$10050$
je cherche un alogrithme pour afficher une combinaison
de lettres, par exemple, lorsqu' un utilisateur tape un
mot "FJK" ou même plus, il faut que mon programme soit capable d'afficher
la combinaison de façon suivante :
F
J
K
FJ
FJK
JK

merci d'avance

yann



Avatar
yann
merci de vos réponses, mais ce n'est pas vraiment la combinaison, j'essaie
de vous donner d'autres exemples
le cas de 4 lettres "FJKU", je veux que mon programme m' affiche :
F
J
K
U
FJ
FK
FU
FJK
FJKU
JK
JU
JKU
KU

merci à tous
yann

"andre.araste" a écrit dans le message de news:
429b39b0$0$11706$
Bonjour

Oui, je possède un programme qui affiche les anagrammes des mots de 2 à 8
lettres.

Ainsi le mot FJK présente 6 combinaisons possibles.

Ledit programme est ancien et fonctionne sous DOS

??
--
Bonne réception.

http://perso.wanadoo.fr/andre.araste/
Membre du Club Win's: http://www.clubwins.org
Avertissement: Je ne vends rien.



"yann" a écrit dans le message de news:
4299bef9$0$10050$
je cherche un alogrithme pour afficher une combinaison
de lettres, par exemple, lorsqu' un utilisateur tape un
mot "FJK" ou même plus, il faut que mon programme soit capable d'afficher
la combinaison de façon suivante :
F
J
K
FJ
FJK
JK

merci d'avance

yann






Avatar
Fred
Dans son message 2jKme.3630$
yann nous dit :

merci de vos réponses, mais ce n'est pas vraiment la combinaison,
j'essaie de vous donner d'autres exemples
le cas de 4 lettres "FJKU", je veux que mon programme m' affiche :
F
J
K
U
FJ
FK
FU
FJK
FJKU
JK
JU
JKU
KU

merci à tous
yann

"andre.araste" a écrit dans le message de
news: 429b39b0$0$11706$
Bonjour

Oui, je possède un programme qui affiche les anagrammes des mots de
2 à 8 lettres.

Ainsi le mot FJK présente 6 combinaisons possibles.

Ledit programme est ancien et fonctionne sous DOS

??
--
Bonne réception.

http://perso.wanadoo.fr/andre.araste/
Membre du Club Win's: http://www.clubwins.org
Avertissement: Je ne vends rien.



"yann" a écrit dans le message de news:
4299bef9$0$10050$
je cherche un alogrithme pour afficher une combinaison
de lettres, par exemple, lorsqu' un utilisateur tape un
mot "FJK" ou même plus, il faut que mon programme soit capable
d'afficher la combinaison de façon suivante :
F
J
K
FJ
FJK
JK

merci d'avance

yann







Bonsoir,
Quelque chose dans ce genre alors ?
8<------------------------
mot="FJKU"
For i=1 to Len(mot)
For j=1 to Len(mot)-i+1
Print Mid(Mot, j, i)
Next
Next
8<------------------------
Mais ils ne sont pas dans l'ordre que tu indiques. C'est important ?

--
Fred
Avatar
yann
c'est presque ça, votre programme ne permet pas d'afficher:
FK
FU
JU
"Fred" a écrit dans le message de
news:%
Dans son message 2jKme.3630$
yann nous dit :

> merci de vos réponses, mais ce n'est pas vraiment la combinaison,
> j'essaie de vous donner d'autres exemples
> le cas de 4 lettres "FJKU", je veux que mon programme m' affiche :
> F
> J
> K
> U
> FJ
> FK
> FU
> FJK
> FJKU
> JK
> JU
> JKU
> KU
>
> merci à tous
> yann
>
> "andre.araste" a écrit dans le message de
> news: 429b39b0$0$11706$
>> Bonjour
>>
>> Oui, je possède un programme qui affiche les anagrammes des mots de
>> 2 à 8 lettres.
>>
>> Ainsi le mot FJK présente 6 combinaisons possibles.
>>
>> Ledit programme est ancien et fonctionne sous DOS
>>
>> ??
>> --
>> Bonne réception.
>>
>> http://perso.wanadoo.fr/andre.araste/
>> Membre du Club Win's: http://www.clubwins.org
>> Avertissement: Je ne vends rien.
>>>
>> "yann" a écrit dans le message de news:
>> 4299bef9$0$10050$
>>> je cherche un alogrithme pour afficher une combinaison
>>> de lettres, par exemple, lorsqu' un utilisateur tape un
>>> mot "FJK" ou même plus, il faut que mon programme soit capable
>>> d'afficher la combinaison de façon suivante :
>>> F
>>> J
>>> K
>>> FJ
>>> FJK
>>> JK
>>>
>>> merci d'avance
>>>
>>> yann

Bonsoir,
Quelque chose dans ce genre alors ?
8<------------------------
mot="FJKU"
For i=1 to Len(mot)
For j=1 to Len(mot)-i+1
Print Mid(Mot, j, i)
Next
Next
8<------------------------
Mais ils ne sont pas dans l'ordre que tu indiques. C'est important ?

--
Fred





Avatar
Fred
Dans le message:429c278e$0$6777$,
yann écrit :
"Fred" a écrit dans le message de
news:%
Dans son message 2jKme.3630$
yann nous dit :

merci de vos réponses, mais ce n'est pas vraiment la combinaison,
j'essaie de vous donner d'autres exemples
le cas de 4 lettres "FJKU", je veux que mon programme m' affiche :
F
J
K
U
FJ
FK
FU
FJK
FJKU
JK
JU
JKU
KU

merci à tous
yann

"andre.araste" a écrit dans le message de
news: 429b39b0$0$11706$
Bonjour

Oui, je possède un programme qui affiche les anagrammes des mots de
2 à 8 lettres.

Ainsi le mot FJK présente 6 combinaisons possibles.

Ledit programme est ancien et fonctionne sous DOS

??
--
Bonne réception.

http://perso.wanadoo.fr/andre.araste/
Membre du Club Win's: http://www.clubwins.org
Avertissement: Je ne vends rien.



"yann" a écrit dans le message de news:
4299bef9$0$10050$
je cherche un alogrithme pour afficher une combinaison
de lettres, par exemple, lorsqu' un utilisateur tape un
mot "FJK" ou même plus, il faut que mon programme soit capable
d'afficher la combinaison de façon suivante :
F
J
K
FJ
FJK
JK

merci d'avance

yann







Bonsoir,
Quelque chose dans ce genre alors ?
8<------------------------
mot="FJKU"
For i=1 to Len(mot)
For j=1 to Len(mot)-i+1
Print Mid(Mot, j, i)
Next
Next
8<------------------------
Mais ils ne sont pas dans l'ordre que tu indiques. C'est important ?

--
Fred





c'est presque ça, votre programme ne permet pas d'afficher:
FK
FU
JU



Ah oui, désolé, j'avais souvenir du premier exemple !
Je regarderais ce soir si je peux faire mieux !
Si j'ai bien compris, seul l'ordre doit être conservé.

--
Fred
Avatar
Fred
Dans le message:429c278e$0$6777$,
yann écrit :
c'est presque ça, votre programme ne permet pas d'afficher:
FK
FU
JU
"Fred" a écrit dans le message de
news:%
Dans son message 2jKme.3630$
yann nous dit :

merci de vos réponses, mais ce n'est pas vraiment la combinaison,
j'essaie de vous donner d'autres exemples
le cas de 4 lettres "FJKU", je veux que mon programme m' affiche :
F
J
K
U
FJ
FK
FU
FJK
FJKU
JK
JU
JKU
KU

merci à tous
yann

"andre.araste" a écrit dans le message de
news: 429b39b0$0$11706$
Bonjour

Oui, je possède un programme qui affiche les anagrammes des mots de
2 à 8 lettres.

Ainsi le mot FJK présente 6 combinaisons possibles.

Ledit programme est ancien et fonctionne sous DOS

??
--
Bonne réception.

http://perso.wanadoo.fr/andre.araste/
Membre du Club Win's: http://www.clubwins.org
Avertissement: Je ne vends rien.



"yann" a écrit dans le message de news:
4299bef9$0$10050$
je cherche un alogrithme pour afficher une combinaison
de lettres, par exemple, lorsqu' un utilisateur tape un
mot "FJK" ou même plus, il faut que mon programme soit capable
d'afficher la combinaison de façon suivante :
F
J
K
FJ
FJK
JK

merci d'avance

yann







Bonsoir,
Quelque chose dans ce genre alors ?
8<------------------------
mot="FJKU"
For i=1 to Len(mot)
For j=1 to Len(mot)-i+1
Print Mid(Mot, j, i)
Next
Next
8<------------------------
Mais ils ne sont pas dans l'ordre que tu indiques. C'est important ?

--
Fred





Tu peux essayer ceci :

8<-----------------------
Dim s As String
s = ""
Dim mot As String
mot = "ABCDE"
Dim i As Long
For i = 1 To 2 ^ (Len(mot) - 1)
For j = 1 To Len(mot)
If (2 ^ (j - 1) And i) <> 0 Then
s = s & Mid(mot, j, 1)
End If
Next j
s = s & vbCrLf
Next i
MsgBox s
8<--------------------------

L'inconvénient c'est que c'est limité en nombre de caractères (1 bit de
l'entier i = 1 position de caractère)


--
Fred
Avatar
yann
je suis désolé, ce n'est pas encore ça, votre programme n'affichait pas :
FU
JU
JKU
KU
FJKU

"Fred" a écrit dans le message de
news:
Dans le message:429c278e$0$6777$,
yann écrit :
> c'est presque ça, votre programme ne permet pas d'afficher:
> FK
> FU
> JU
> "Fred" a écrit dans le message de
> news:%
>> Dans son message 2jKme.3630$
>> yann nous dit :
>>
>>> merci de vos réponses, mais ce n'est pas vraiment la combinaison,
>>> j'essaie de vous donner d'autres exemples
>>> le cas de 4 lettres "FJKU", je veux que mon programme m' affiche :
>>> F
>>> J
>>> K
>>> U
>>> FJ
>>> FK
>>> FU
>>> FJK
>>> FJKU
>>> JK
>>> JU
>>> JKU
>>> KU
>>>
>>> merci à tous
>>> yann
>>>
>>> "andre.araste" a écrit dans le message de
>>> news: 429b39b0$0$11706$
>>>> Bonjour
>>>>
>>>> Oui, je possède un programme qui affiche les anagrammes des mots de
>>>> 2 à 8 lettres.
>>>>
>>>> Ainsi le mot FJK présente 6 combinaisons possibles.
>>>>
>>>> Ledit programme est ancien et fonctionne sous DOS
>>>>
>>>> ??
>>>> --
>>>> Bonne réception.
>>>>
>>>> http://perso.wanadoo.fr/andre.araste/
>>>> Membre du Club Win's: http://www.clubwins.org
>>>> Avertissement: Je ne vends rien.
>>>>>
>>>> "yann" a écrit dans le message de news:
>>>> 4299bef9$0$10050$
>>>>> je cherche un alogrithme pour afficher une combinaison
>>>>> de lettres, par exemple, lorsqu' un utilisateur tape un
>>>>> mot "FJK" ou même plus, il faut que mon programme soit capable
>>>>> d'afficher la combinaison de façon suivante :
>>>>> F
>>>>> J
>>>>> K
>>>>> FJ
>>>>> FJK
>>>>> JK
>>>>>
>>>>> merci d'avance
>>>>>
>>>>> yann
>>
>> Bonsoir,
>> Quelque chose dans ce genre alors ?
>> 8<------------------------
>> mot="FJKU"
>> For i=1 to Len(mot)
>> For j=1 to Len(mot)-i+1
>> Print Mid(Mot, j, i)
>> Next
>> Next
>> 8<------------------------
>> Mais ils ne sont pas dans l'ordre que tu indiques. C'est important ?
>>
>> --
>> Fred

Tu peux essayer ceci :

8<-----------------------
Dim s As String
s = ""
Dim mot As String
mot = "ABCDE"
Dim i As Long
For i = 1 To 2 ^ (Len(mot) - 1)
For j = 1 To Len(mot)
If (2 ^ (j - 1) And i) <> 0 Then
s = s & Mid(mot, j, 1)
End If
Next j
s = s & vbCrLf
Next i
MsgBox s
8<--------------------------

L'inconvénient c'est que c'est limité en nombre de caractères (1 bit de
l'entier i = 1 position de caractère)


--
Fred




Avatar
Fred
Dans son message 429c88ce$0$6734$
yann nous dit :


"Fred" a écrit dans le message de
news:
Dans le message:429c278e$0$6777$,
yann écrit :
c'est presque ça, votre programme ne permet pas d'afficher:
FK
FU
JU
"Fred" a écrit dans le message de
news:%
Dans son message 2jKme.3630$
yann nous dit :

merci de vos réponses, mais ce n'est pas vraiment la combinaison,
j'essaie de vous donner d'autres exemples
le cas de 4 lettres "FJKU", je veux que mon programme m' affiche
: F
J
K
U
FJ
FK
FU
FJK
FJKU
JK
JU
JKU
KU

merci à tous
yann

"andre.araste" a écrit dans le message
de news: 429b39b0$0$11706$
Bonjour

Oui, je possède un programme qui affiche les anagrammes des mots
de 2 à 8 lettres.

Ainsi le mot FJK présente 6 combinaisons possibles.

Ledit programme est ancien et fonctionne sous DOS

??
--
Bonne réception.

http://perso.wanadoo.fr/andre.araste/
Membre du Club Win's: http://www.clubwins.org
Avertissement: Je ne vends rien.



"yann" a écrit dans le message de news:
4299bef9$0$10050$
je cherche un alogrithme pour afficher une combinaison
de lettres, par exemple, lorsqu' un utilisateur tape un
mot "FJK" ou même plus, il faut que mon programme soit capable
d'afficher la combinaison de façon suivante :
F
J
K
FJ
FJK
JK

merci d'avance

yann







Bonsoir,
Quelque chose dans ce genre alors ?
8<------------------------
mot="FJKU"
For i=1 to Len(mot)
For j=1 to Len(mot)-i+1
Print Mid(Mot, j, i)
Next
Next
8<------------------------
Mais ils ne sont pas dans l'ordre que tu indiques. C'est important
?

--
Fred





Tu peux essayer ceci :

8<-----------------------
Dim s As String
s = ""
Dim mot As String
mot = "ABCDE"
Dim i As Long
For i = 1 To 2 ^ (Len(mot) - 1)
For j = 1 To Len(mot)
If (2 ^ (j - 1) And i) <> 0 Then
s = s & Mid(mot, j, 1)
End If
Next j
s = s & vbCrLf
Next i
MsgBox s
8<--------------------------

L'inconvénient c'est que c'est limité en nombre de caractères (1 bit
de l'entier i = 1 position de caractère)


--
Fred





je suis désolé, ce n'est pas encore ça, votre programme n'affichait
pas : FU
JU
JKU
KU
FJKU




Oui, une parenthèse mal placée :
For i = 1 To 2 ^ (Len(mot) - 1)
doit être :
For i = 1 To 2 ^ Len(mot) - 1
J'ai cru avoir obtenu le bon résultat car j'ai oublié que j'avais mis un E
en plus dans le mot de test.
(en fait il manquait toutes les combinaisons contenant la dernière lettre)

Et malgré la limitation cela conviendrait ?
(je n'ai pas fait de tests pour voir à partir de combien de caractères on a
un problème lié au calcul de la puissance de 2)
Le temps de calcul augmente très vite.

--
Fred
1 2