Posez votre question Signaler

Algo: créer toutes les combinaisons possibles [Résolu]

Kobaya 289Messages postés 28 mai 2004Date d'inscription - Dernière réponse le 29 avril 2012 à 14:55
Bonjour à tous,

Je me creuse la tête depuis un bon moment déjà pour résoudre ceci :
J'ai 3 éléments A, B et C. Comment faire pour construire toutes les combinaisons possibles (ABC, ACB, BAC, BCA, CAB, CBA), sachant que le nombre d'éléments peut aller jusqu'à 4 ou 5. Le nombre de combinaisons est n!, mais part ça...
J'ai essayé en vain plusieurs combinaisons de boucles FOR/NEXT, DO/LOOP...

A défaut de me donner l'algorythme, voire le prog en VB, si quelqu'un a une piste, une idée de départ, c'est pas de refus!

A+,
Kobaya.
Lire la suite 

Algo: créer toutes les combinaisons possibles »

73 réponses
Réponse
+24
moins plus
La modif est simple, j'ai ajouté la "sub" nomée doublon.

    text$="ABCDEA"
    debut$=""
    global result$, debut$, glon, nb, blok
    debut$=text$
    glon=len(text$)
    call doublon text$
    if blok=1 then end
    r$=combine$(text$)
    print "il y a ";nb;" réponses."
    input r$
    end

function combine$(text$)
    lon=len(text$)
    for i=1 to lon
        trace 2
        text2$=mid$(text$,i+1)+left$(text$,i-1)
        ch$=mid$(text$,i,1)
        result$=result$+ch$
        if text2$<>"" then
            r$=combine$(text2$)
        else
            rlon=len(result$)
            dlon=glon-rlon
            result$=left$(debut$,dlon)+result$
            debut$=result$
            print result$
            result$=""
            nb=nb+1
        end if
    next i
    combine$=""
    end function

sub doublon txt$
    lon=len(txt$)
    for i=1 to lon
        ch$=mid$(txt$, i, 1)
        for j=1 to lon
            if j=i then exit for
            if ch$=mid$(txt$, j, 1) then blok=1: exit for
        next j
        if blok=1 then exit for
    next i
    if blok=1 then
        notice "Doublon detecté !"+chr$(13)+"Le caractère '"+ch$+"' à été detecté en double."
    end if
    end sub


et maintenant, cela te convient t'il ?

voici le resultat pour la chaine "ABCD":
ABCD
ABDC
ACDB
ACBD
ADBC
ADCB
BCDA
BCAD
BDAC
BDCA
BACD
BADC
CDAB
CDBA
CABD
CADB
CBDA
CBAD
DABC
DACB
DBCA
DBAC
DCAB
DCBA
il y a 24 réponses.
?
Lmedou - 13 févr. 2012 à 10:46
Bonjour,

Je dois être un peu neuneu, mais cette macro semble parfaitement répondre à mon besoin, mais je ne parviens pas à la faire fonctionner.

Quelle nom faut il lui donner ? Un Sub Macro2() la fait planter. Pour info, je suis Excel 2007

Une bonne âme peut elle peut me débloquer ?

Merci.
Adrien94 - 15 févr. 2012 à 14:28
Si tu as du mal, tu peux tester le code suivant :

Sub genererCombinaison()
'On déclare des variables de types Integer qui stockent le code ASCII de la lettre
Dim char_number_1, char_number_2, char_number_3, char_number_4 As Integer
'Variable qui va stocker le résultat de notre combinaison
Dim macombinaison As String
'Integer qui compte le nombre de combinaisons
Dim cmb_id As Integer

'Initialisation du compteur
cmb_id = 1

'la lettre A a pour code ASCII 65
'la lettre B a pour code ASCII 66
'la lettre C a pour code ASCII 67
'la lettre D a pour code ASCII 68

'On parcourt les lettres de A à D
For char_number_1 = 65 To 68
'On parcourt les lettres de A à D
For char_number_2 = 65 To 68
'On élimine le cas où les 2 premières lettres sont identiques
If char_number_2 <> char_number_1 Then
'On parcourt les lettres de A à D
For char_number_3 = 65 To 68
'On élimine les cas suivants :
' 3ème lettre = 2ème lettre
' 3ème lettre = 1ère lettre
If char_number_3 <> char_number_2 And char_number_3 <> char_number_1 Then
'On parcourt les lettres de A à D
For char_number_4 = 65 To 68
'On élimine les cas suivants :
' 4ème lettre = 3ème lettre
' 4ème lettre = 2ème lettre
' 4ème lettre = 1ère lettre
If char_number_4 <> char_number_3 And _
char_number_4 <> char_number_2 And _
char_number_4 <> char_number_1 Then
'On concatène les caractères formés à partir des codes ASCII
macombinaison = Chr(char_number_1) & Chr(char_number_2) & Chr(char_number_3) & Chr(char_number_4)
'On affiche le numéro de la combinaison et la chaîne de caractères
Debug.Print ("Combinaison n°" & Trim(Str(cmb_id)) & " : " & macombinaison)
'On incrémente le compteur
cmb_id = cmb_id + 1
End If
Next
End If
Next
End If
Next
Next char_number_1
End Sub

Cette Sub affiche le résultat dans la console de Debug
anto - 29 avril 2012 à 14:55
des chiffres
Ajouter un commentaire
Réponse
+5
moins plus
Bonsoir!

Je réveille un peu le topic, je n'ai pas compris énormément à ce qu'il y a de marqué, étant un gros débutant sur excel (j'ai 16ans) j'aimerais pouvoir trouver la formule pour obtenir toutes les combinaisons possibles pour des chiffres (au lieu des lettres proposées ci-dessus) pour mon PMU.
Je détails un peu plus au cas ou,
j'ai 5 chiffres:
1 | 2 | 3 | 4 | 5
Et j'aimerais pouvoir trouver les combinaisons qui existent avec ces nombre (la il doit y en avoir 120 si je ne me trompe pas dans le calcul qui est 1*2*3*4*5 pour avoir le nombre de combinaisons possible)
ce qui donnerais pour un début:
1 | 2 | 3 | 5 | 4
1 | 2 | 5 | 4 | 3
1 | 2 | 5 | 3 | 4
... jusqu'à la fin.

Déja est-ce possible (je pense que oui vu que ca marche pour les lettres)
Ensuite, quelqu'un aura-t-il la gentillesse de m'expliquer clairement pour que je comprenne?

Merci d'avance,

Cordialement Alex!
zebulon2503- 16 févr. 2009 à 08:57
Salut,
je regarde ce soir chez moi si j'ai encore ce programme. Si c'est bon, je peux te le modifier, te l'envoyer et t'expliquer. Ca te va ?
coy - 11 nov. 2009 à 09:42
bonjour
j'aurais voulu savoir si ce systeme fonctionner et si il etait possible de se le procurer . merci d'avance
drope - 5 oct. 2011 à 19:45
salut , j'ai besoin de la liste entiere de toues les combinaisons possible . le code est a quatre chiifres , les chiffres vont de 0 a 9 . exemple : 5269 . et il me faut la liste entiere pouvez vous me la donner !!!! c'est urgent merci d'avance .
Ajouter un commentaire
Réponse
+4
moins plus
pour n elements, faut une fonction recursive!
voici l'algo:

fonction init(){
mot("");
}
fonction mot(m : chaine){
lettre =[A,B,C,...] //toutes les lettre
si taille(m)>taille_max_du_mot alors fin //permet de s'arreter!!
pour i=1 à taillle(lettre){
mot(m+lettre[i]); //appel récursif
}
}

stef
Ajouter un commentaire
Réponse
+4
moins plus
Sinon en batch:

@echo off
for %%i in (A,B,C,D) do (
for %%j in (A,B,C,D) do (
for %%k in (A,B,C,D) do (
for %%l in (A,B,C,D) do (
echo %%i%%j%%k%%l
)
)
)
)
pause


Je sais pas si c'est sa que tu cherche.
J'espère t'avoir aider.
Bilou.
librequetucrois - 20 févr. 2012 à 11:36
salut ; au cas où (si ça peut servir) ; CompteurBoucleFor.bat :

(fait à partir du message de cs-bilou suite à une recherche sur le web concernant les problèmes de vitesse quand on veut trouver toutes les combinaisons possibles en itérant le contenu d'un fichier (j'ai trouvé un petit truc mais sans plus) ; j'aurais aimé imbriquer deux compteurs sans utiliser "set /a" pour la compatibilité)

@echo off
cls

setlocal enableextensions enabledelayedexpansion

for %%i in (A,B,C,D) do (
for %%j in (A,B,C,D) do (
for %%k in (A,B,C,D) do (
for %%l in (A,B,C,D) do (

echo %%i%%j%%k%%l

)
)
)
)

pause
cls

set varfincount=37
set tyty=-1

echo Start test compteur HEX (FFFF) et DEC (65535) (fin = !varfincount!) :
echo.
pause
echo.

for %%i in (0 1 2 3 4 5 6 7 8 9 A B C D E F) do (
for %%j in (0 1 2 3 4 5 6 7 8 9 A B C D E F) do (
for %%k in (0 1 2 3 4 5 6 7 8 9 A B C D E F) do (
for %%l in (0 1 2 3 4 5 6 7 8 9 A B C D E F) do (

set /a tyty+=1

echo 111= %%i%%j%%k%%l

if !tyty! GEQ 0 if !tyty! LEQ 9 set varzero=0000
if !tyty! GEQ 10 if !tyty! LEQ 99 set varzero=000
if !tyty! GEQ 100 if !tyty! LEQ 999 set varzero=00
if !tyty! GEQ 1000 if !tyty! LEQ 9999 set varzero=0
if !tyty! GEQ 10000 if !tyty! LEQ 99999 set varzero=

echo 222= !varzero!!tyty!& pause

if !tyty! GEQ !varfincount! call :suite

if !tyty! GEQ 68 goto fin 

)
)
)
)

:suite

echo.
echo Sortie (compteur DEC = !varfincount!) ...
echo.
pause
echo.
cls
set varfincount=68
echo Re-Start test compteur HEX (FFFF) et DEC (65535) (fin = !varfincount!) :
echo.
exit /B

:fin

endlocal
exit /B


le petit truc :
*************
Modèle ... :

Recherches de correspondances hashs / fichiers :

Itérations successives côte-à-côte du contenu .:

Un fichier vide par ligne est créé et itéré ...:

===============================================
0[+1]: 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16! <= base
===============================================
2 PC :
===============================================
!0>1!: 0 1 . . . . . . . . .. .. .. .. .. .. ..! <= constantes
!---!: ----------------------------------------!
0[+2]: 0 . 2 . 4 . 6 . 8 . 10 .. 12 .. 14 .. 16! <= 1 fichier
1[+2]: 0 1 . 3 . 5 . 7 . 9 .. 11 .. 13 .. 15 ..! <= 1 fichier
===============================================
3 PC :
===============================================
!0>2!: 0 1 2 . . . . . . . .. .. .. .. .. .. ..! <= constantes
!---!: ----------------------------------------!
0[+3]: 0 . . 3 . . 6 . . 9 .. .. 12 .. .. 15 ..! <= 1 fichier
1[+3]: 0 1 . . 4 . . 7 . . 10 .. .. 13 .. .. 16! <= 1 fichier
2[+3]: 0 . 2 . . 5 . . 8 . .. 11 .. .. 14 .. ..! <= 1 fichier
===============================================
4 PC :
===============================================
!0>3!: 0 1 2 3 . . . . . . .. .. .. .. .. .. ..! <= constantes
!---!: ----------------------------------------!
0[+4]: 0 . . . 4 . . . 8 . .. .. 12 .. .. .. 16! <= 1 fichier
1[+4]: 0 1 . . . 5 . . . 9 .. .. .. 13 .. .. ..! <= 1 fichier
2[+4]: 0 . 2 . . . 6 . . . 10 .. .. .. 14 .. ..! <= 1 fichier
3[+4]: 0 . . 3 . . . 7 . . .. 11 .. .. .. 15 ..! <= 1 fichier
===============================================
5 PC :
===============================================
!0>4!: 0 1 2 3 4 . . . . . .. .. .. .. .. .. ..! <= constantes
!---!: ----------------------------------------!
0[+5]: 0 . . . . 5 . . . . 10 .. .. .. .. 15 ..! <= 1 fichier
1[+5]: 0 1 . . . . 6 . . . .. 11 .. .. .. .. 16! <= 1 fichier
2[+5]: 0 . 2 . . . . 7 . . .. .. 12 .. .. .. ..! <= 1 fichier
3[+5]: 0 . . 3 . . . . 8 . .. .. .. 13 .. .. ..! <= 1 fichier
4[+5]: 0 . . . 4 . . . . 9 .. .. .. .. 14 .. ..! <= 1 fichier
===============================================

Un fichier par pc ou processeur (...) et avec une itération unique par fichier.

On cherche un hash (un rapide (disons CRC32) puis les autres plus lents pour vérifier si il y a un résultat positif) qui correspond au fichier à reconstruire ; la taille du fichier d'origine en octets est connue et donc la taille du fichier de travail correspond (fsutil file createnew permet de faire un fichier vide) et le hash (crc32 + md5 + sha1 + sha256) provient du fichier d'origine dans un état correcte (pas endommagé).

On itère le contenu du fichier après avoir vérifié si le hash correspond. Si plusieurs pc sont utilisés, la valeur des itérations correspond (...) avec le modèle ci-dessus. On cherche qu'une fois une correspondance.

Les fichiers privées ne doivent pas être récupérés ou reconstruits depuis des fermes de calculateurs publiques ou sans sécurités. La taille et le hash suffise. La sécurité, c'est le temps ; mais le procédé fonctionne.
*************
Ajouter un commentaire
Réponse
+3
moins plus
Salut à tous,

Je suis admiratif des possibilité d'Excel, sans en être un expert, il s'en faut de beaucoup.

J'aimerais savoir comment créer un tableau qui me donnerait une liste des combinaisons de chiffres réalisables avec un nombre x de chiffres; Exemple, combien de combinaisons de 4 chiffres avec 3 chiffres de départ ?)

Je n'arrive pas à trouver la (les) formule(s) adaptée(s)

Bonne journée !

Domget
p.legal- 21 mars 2008 à 01:40
C'est presque le même code en liberty BASIC, il suffit d'accepter les doublons et de refuser 0 comme premier élément de la liste.

si tu veux le code en Liberty BASIC fais moi signe.

@++
zebulon2503- 4 juin 2008 à 08:47
Salut,

je viens de tomber sur cette discussion parlant de combinaison et j'ai besoin d'aide pour ca :)
J'ai un prog en VBA qui doit calculer et afficher des combinaisons de longueur.
Par exemple, sur A feuille de longueur X quelles sont les combinaisons de dispositions possibles de B feuilles de longueur Z, C feuilles de longueur Y...
J'ai reussi a calculer le nombre de combinaisons en utilisant Cnp mais je ne vois pas comment les afficher sur excel.

A savoir, on ne connait jamais le nombre de feuilles a decouper... Si vous avez de lpus dexplications, faites signe

Merci pour votre aide
Ajouter un commentaire
Réponse
+3
moins plus
bonjour tout le monde
merci yasmoh2010
voila le programme de permutation qui affiche toutes les combinaisons possibles des caractères numériques (chiffres) ou alphabétiques en vb.net
par exemple 123
le programme va afficher:
213,231,321,312,132,123



Dim ch1 As String

Function fact(ByVal x As Integer) As Integer

Dim f, i As Integer
f = 1
For i = 1 To x
f = f * i
Next
fact = f

End Function


Sub Main()

Dim ch, ch1 As String
Dim j, n As Integer
Console.WriteLine("donner votre nombre")
ch = Console.ReadLine
n = 0
ch1 = ""
Do
j = 1
For i As Integer = 0 To ch.Length - 1
j = j + 1
If i = 0 Then
ch1 = Mid(ch, j, 1) & Mid(ch, j - 1, 1) & Mid(ch, j + 1, ch.Length - j)
Console.Write(ch1 & ",")
ch = ch1
n = n + 1
Else
If ch.Length - j >= 0 Then
ch1 = Mid(ch1, 1, i) & Mid(ch, j, 1) & Mid(ch, j - 1, 1) & Mid(ch, j + 1, ch.Length - j)
Console.Write(ch1 & ",")
ch = ch1
n = n + 1
End If
End If
Next
Loop Until n = fact(ch.Length)
Console.ReadLine()

End Sub


bonne chance a vous tous
Ajouter un commentaire
Réponse
+2
moins plus
Salut voici en gros l'idée

const int N=3; // par exemple

for(int i=0;i<N;i++)
{
for(int j=0;j<N;j++)
if(j!=i) // test 1
{
for(int k=0;k<N;k++)
if(k!=i && k!=j)
cout<<v[i]<<v[j]<<v[k]<<endl;
} // fin test 1
} // fin pour en i
Kobaya- 1 juil. 2005 à 01:06
et voici, un peu étoffé pour pouvoir traiter jusqu'à 6 éléments, ce que ça donne en VBA Excel. Encore merci Pom :-) :
Public Sub CreationChemin()
    Dim intI1 As Integer, intI2 As Integer, intI3 As Integer
    Dim intI4 As Integer, intI5 As Integer, intI6 As Integer, intN As Integer
    Dim strTab As String
    Dim sngChrono As Single
    
    strTab = UCase(InputBox("Saisissez les éléments : ", "Saisie", "ABCDEF"))
    
    sngChrono = Timer
    
    intI1 = 1
    Do Until Cells(1, intI1).Value = ""
        intI1 = intI1 + 1
    Loop
    Cells(1, intI1).Select
    
    intN = Len(strTab)
    ActiveCell.Value = strTab
    ActiveCell.Offset(1, 0).FormulaR1C1 = "=counta(R4C:R65536C)"
    ActiveCell.Offset(3, 0).Select
    
    For intI1 = 1 To intN
        For intI2 = 1 To intN
            If intI2 <> intI1 Then
                For intI3 = 1 To intN
                    If intI3 <> intI1 And intI3 <> intI2 Then
                        If Len(strTab) = 3 Then
                            ActiveCell.Value = Mid(strTab, intI1, 1) & Mid(strTab, intI2, 1) & Mid(strTab, intI3, 1)
                            ActiveCell.Offset(1, 0).Select
                        Else
                            For intI4 = 1 To intN
                                If intI4 <> intI1 And intI4 <> intI2 And intI4 <> intI3 Then
                                    If Len(strTab) > 4 Then
                                        For intI5 = 1 To intN
                                            If intI5 <> intI1 And intI5 <> intI2 And intI5 <> intI3 And intI5 <> intI4 Then
                                                If Len(strTab) > 5 Then
                                                    For intI6 = 1 To intN
                                                        If intI6 <> intI1 And intI6 <> intI2 And intI6 <> intI3 And intI6 <> intI4 And intI6 <> intI5 Then
                                                            ActiveCell.Value = Mid(strTab, intI1, 1) & Mid(strTab, intI2, 1) & Mid(strTab, intI3, 1) _
                                                                            & Mid(strTab, intI4, 1) & Mid(strTab, intI5, 1) & Mid(strTab, intI6, 1)
                                                            ActiveCell.Offset(1, 0).Select
                                                        End If
                                                    Next
                                                Else
                                                    ActiveCell.Value = Mid(strTab, intI1, 1) & Mid(strTab, intI2, 1) & Mid(strTab, intI3, 1) _
                                                        & Mid(strTab, intI4, 1) & Mid(strTab, intI5, 1)
                                                    ActiveCell.Offset(1, 0).Select
                                                End If
                                            End If
                                        Next
                                    Else
                                        ActiveCell.Value = Mid(strTab, intI1, 1) & Mid(strTab, intI2, 1) & Mid(strTab, intI3, 1) & Mid(strTab, intI4, 1)
                                        ActiveCell.Offset(1, 0).Select
                                    End If
                                End If
                            Next
                        End If
                    End If
                Next
            End If
        Next
    Next
    
    Cells(3, ActiveCell.Column).Value = (Timer - sngChrono)
End Sub

brico2008 - 24 mars 2008 à 11:55
quelles lignes faut-il ajouter pour l'algo "ABCDEFG" soit le "G" en plus par rapport au tien ?
Merci
elegoKobaya - 28 oct. 2009 à 17:30
Bonjour,
j'ai essayé le code (copier coller je ss nul en VBA) et ça marche.
J'ai un petit problème à régler :
J'ai une grille de 5 critères à noter de 1 à 3
je veux afficher sur Excel toute les combinaisons possibles
Merci
Ajouter un commentaire
Réponse
+2
moins plus
Voici le code en liberty BASIC

    text$="ABCDE"
    debut$=""
    global result$, debut$, glon, nb
    debut$=text$
    glon=len(text$)
    r$=combine$(text$)
    print "il y a ";nb;" réponses."
    input r$
    end

function combine$(text$)
    lon=len(text$)
    for i=1 to lon
        trace 2
        text2$=mid$(text$,i+1)+left$(text$,i-1)
        ch$=mid$(text$,i,1)
        result$=result$+ch$
        if text2$<>"" then
            r$=combine$(text2$)
        else
            rlon=len(result$)
            dlon=glon-rlon
            result$=left$(debut$,dlon)+result$
            debut$=result$
            print result$
            result$=""
            nb=nb+1
        end if
    next i
    combine$=""
    end function


@++

liberty BASIC France : http://lbasic.atomysk.com
et son Forum d'aide : http://lbasic.atomysk.com/forum
Kobaya- 4 juil. 2005 à 17:24
merci pour ta réponse !

J'ai oublié de préciser que chaque lettre ne peut pas être doublée : AABCE ne dois pas être accepté.

J'ai modifié (un peu) et testé ton code, mais malheureusement pour moi, ça ne fonctionne pas...

Ajouter un commentaire
Réponse
+2
moins plus
Bonjour,

je voudrais adapter le programme précédent à la création d'une liste de toutes les combinaisons possibles de mots prédéfinie dans une première liste. Le probleme se complique donc un peu car il s'agit maintenant de combinaisons et non plus de factoriel. Le programme devrait lire dans un premier fichier text et ecrire dans un deuxieme.
exemple de premiere liste de mots: A B C
la deuxieme liste doit donc contenir: A B C AB AC BC BA CA CB ABC ACB BAC BCA CAB CBA

La raison pour laquelle je demande ceci c'est pour la création d'une liste de mots qui me servirai pour faire tourner un programme de test de mots de pass en ayant une idée de base sur les mots employés lors de la création du mots de pass...en d'autre terme g un fichier rar dont g zapé le mots de pass.....Quand on est con...on est con..

Merci de votre aide..jetez moi une boué
Ajouter un commentaire
Réponse
+2
moins plus
Je pe permet de vous demander la quasi même chose !
Je dispose de 12 chiffres allant de 0 à 9 il fraudais que je trouve tout les combinaison réalisable a 13 chiffre exactement sans qu'il soit répéter.

exemple avec 4 chiffres : 3 4 8 9 >>
3489|3498|3894|3849|3984|3948
4893|4839|4938|4983|4389|4398
et ect ....

donc je suis sur excel 2007/2008
et je connais pas l'éditeur VB !

Merci de votre aide
(ps alt +F11 met en marche ma web cam lol)
zebulon2503- 20 mars 2009 à 13:04
Euh... Si t'as 12 chiffres et que tu veux faire des combinaisons de 13 chiffres sans doublons, y'a un blem...
Donne un exemple pour ton cas : une liste de 12 chiffres et quelques combinaisons.
Ca aidera a mieux cerner ton histoire :)
A+

EDIT : C'est dans une page Excel que tu tapes Alt+F11
Sinon, tu peux aussi aller dans Affichage ; Barre d'outils ; Visual Basic et dans la nouvelle petite fenêtre, cliques sur l'icône Visual Basic Editor (une icône avec 2 cylindres rouge et jaune devant une fenêtre)
Ajouter un commentaire
Réponse
+2
moins plus
Bonjour

C'est trop chou de nous proposer de l'aide !!!!
Alors que tu nous demandes de faire tes devoirs à ta place !

Il y a parfois des trucs marrants sur ce forum.
Ajouter un commentaire
Réponse
+2
moins plus
Bonjour,
je cherche à afficher toute les combinaisons possibles pour une grille de notation (1 à 3) selon 5 critères (A,B,C,D,E):
Ex:
Critères A B C D E
Notations (1 à 3) 1 2 1 3 2
elego07@gmail.com
Merci
Ajouter un commentaire
Réponse
+1
moins plus
et pour 'n' elements?
p.legal- 21 mars 2008 à 01:36
Mon code est une fonction récursive. Plus n est grand plus ça prendra de temps mais elle peut traiter n'importe quelle valeur de n (sous reserve de la limitation imposée par ta mémoire vive lol )
Ajouter un commentaire
Réponse
+1
moins plus
salut BM,

ce poste date un peu, et je n'ai plus trop les données en tête, mais à priori, la fonction récursive devrait fonctionner quelque soit le nombre de caractères à permuter.

Cordialement,
Kobaya.Configuration: Windows 2000 Firefox 2.0.0.5
Ajouter un commentaire
Réponse
+1
moins plus
bonjour chere lecteur ce probleme est purement mathematique prend un livre sur Cn,p probleme de combinaison combinatoire
si tu cherches toujours un solution au probleme

prends contact avec moi mp280272@yahoo.frConfiguration: Windows XP Internet Explorer 7.0
Ajouter un commentaire
Réponse
+1
moins plus
azerty
Ajouter un commentaire
Réponse
+1
moins plus
Bonjour!
Est il possible de faire la meme chose mais avec des mots?
exemple avec les mots coco kiwi jus
et un résultat qui serait:
coco
kiwi
jus
cocococo
cocokiwi
cocojus
cocococococo
[...]
just1xpa2- 29 juin 2008 à 12:37
bonjour, pourriez vous nous mettre un fichier, pour modification, merci,
http://cjoint.com/

Quand la base est saine, ceux qui interviennent derrière toi sont heureux 
à l'inverse, ils te maudissent ...
Ajouter un commentaire
Réponse
+1
moins plus
Ca serait super simpas de ta part, désolé du temps pour la réponse j'ai du boulot pour les cours, je peux te rep dans la journé sinon pas avant vendredi.

Merci a toi!
bobf490 - 7 mars 2009 à 20:59
salut je suis un peut nul en prog et je voulais savoir ou est ce qu'on entre toutes ces lignes que vous écrivé car moi aussi j'ai un devoir sur les probabilité et du coup cela m'aiderai grandement merci d'avance
zebulon2503- 8 mars 2009 à 02:17
Si t'es dans Excel, tape Alt+F11, tu arriveras dans l'éditeur VB.
Si t'as besoin d'aide pour un truc spécial, hésites pas à poster ici ou envoyer un mail (mon adresse est sur mon profil)
A+
coyzebulon2503 - 11 nov. 2009 à 09:40
bonjour
serait il de m'en faire part .merci d'avance
Ajouter un commentaire
Réponse
+1
moins plus
voici mes chiffre 8 0 0 1 7 6 4 5 2 6 4 5

donc je voudrais avoir tout les combinaison qu'on puise avoir avec ses chiffre la :
8 0 0 1 7 6 4 5 2 6 4 5
8 0 0 1 7 6 4 5 2 5 6 4
8 0 0 1 7 6 4 5 2 5 4 6 ...

Je sais que ça va faire une liste monstrueuse mais il me les faut touts
C'est la dernière étape d'un projet

Merci d'avance !
ziosoleildz - 26 nov. 2009 à 21:59
Bonjour

je suis intéressé par ton programme peux-tu m'en dire plus

voici mon adresse mail cararena@voo.be
TIMOUNGEGEsoleildz - 13 janv. 2010 à 22:12
Bonjour,

Je suis interesse parle programme de calcul.

Serait possible de me contacter SVP
Pacorabanixsoleildz - 13 janv. 2010 à 22:26
la personne en question est un utilisateur anonyme au moment où elle a écrit ce message. Il n'y a donc aucune chance qu'elle repasse par ce sujet, presque un an après. (Elle ne sera pas alertée d'une réponse)

Cdlt
Ajouter un commentaire
Réponse
+1
moins plus
bonjour pouvais vous m'aidé je recherché tout les combinaison possible en majuscule et minuscule et avec melange des deux sur un code qui et fd69tr3e8787 mais sans bougé les chiffres n'y les lettres merci de votre reponse
Ajouter un commentaire
Ce document intitulé « algo: créer toutes les combinaisons possibles » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?
algo: créer toutes les combinaisons possibles - page 2