XL pour MAC Puissance 14 Combinaisons

J

jmfmarques

XLDnaute Accro

• 29 Mars 2020

• #2

Bonjour
Quel calcul as-tu fait pour déterminer que les combinaisons possibles de 2 éléments parmi 14 sont au nombre de 8192 ?

A moins que ce que tu appelles "combinaisons" ne soit autre chose, mais alors : quoi ?

 

Vote positif 0 Vote négatif

P

Pounet95

XLDnaute Occasionnel

• 29 Mars 2020

• #3

Bonsoir,
Pour moi ça ne feraient que 91 combinaisons ?

 

Vote positif 0 Vote négatif

P

Pounet95

XLDnaute Occasionnel

• 29 Mars 2020

• #4

Re,
Mais peut-être je me trompe ?

11

VB:

Sub duos()
    Dim i As Integer
    Dim j As Integer
    
    For i = 1 To 13
        For j = i + 1 To 14
            Cells(i + 7, j + 4) = Cells(i + 7, 3) & "-" & Cells(j + 7, 3)
        Next j
    Next i

End Sub[
/CODE]

 

Vote positif 0 Vote négatif

J

jmfmarques

XLDnaute Accro

• 29 Mars 2020

• #5

Bonjour Pounet95
Tout-à-fait (91 sans arrangements et 182 avec arrangements)
Donc en aucun cas 8192.

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 29 Mars 2020

• #6

Bonjour Alexandre, Jmfmarques, Pounet,
En PJ un essai.
J'ai considéré que AE et EA étaient deux solutions.

 

Pièces jointes

• TriLettres.xlsm

  23.9 KB · Affichages: 4

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 29 Mars 2020

• #7

Bonjour le fil, alexandre, Pounet95, jmfmarques, sylvanu

Sans Mac, sans Excel, juste avec mes doigts 😉

Spoiler

Nine Eleven ;-)]
A,E
A,I
A,O
A,U
A,R
A,S
A,T
A,N
A,L
A,P
A,M
A,B
A,X
E,I
E,O
E,U
E,R
E,S
E,T
E,N
E,L
E,P
E,M
E,B
E,X
I,O
I,U
I,R
I,S
I,T
I,N
I,L
I,P
I,M
I,B
I,X
O,U
O,R
O,S
O,T
O,N
O,L
O,P
O,M
O,B
O,X
U,R
U,S
U,T
U,N
U,L
U,P
U,M
U,B
U,X
R,S
R,T
R,N
R,L
R,P
R,M
R,B
R,X
S,T
S,N
S,L
S,P
S,M
S,B
S,X
T,N
T,L
T,P
T,M
T,B
T,X
N,L
N,P
N,M
N,B
N,X
L,P
L,M
L,B
L,X
P,M
P,B
P,X
M,B
M,X
B,X

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 29 Mars 2020

• #8

Re

Excel dit :105
=COMBINA(14;2)
Et disait bien 91
=COMBIN(14;2)

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 29 Mars 2020

• #9

Re,
Sans infos supplémentaires, AE et EA sont deux combinaisons distinctes, donc 182 combinaisons. 😉
Comme en informatique 01 et 10 ne peuvent être confondues.

 

Vote positif 0 Vote négatif

J

jmfmarques

XLDnaute Accro

• 29 Mars 2020

• #10

jmfmarques à dit:

(91 sans arrangements et 182 avec arrangements)

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 29 Mars 2020

• #11

Re

Excel dit aussi 182
=PERMUTATION(14;2)

Alors ici, on est dans la combine ou chez le Père Muth ?
😉

 

Vote positif 0 Vote négatif

J

jmfmarques

XLDnaute Accro

• 29 Mars 2020

• #12

Bon ... a lire --->> et à adopter (question vocabulaire, ce qui permet d'être tous au diapason ) :

factorielle, arrangement, permutation, combinaison

arithmétique amusante - factorielles et combinaisons, sous-factorielles,primorielles

villemin.gerard.free.fr

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif

P

Pounet95

XLDnaute Occasionnel

• 29 Mars 2020

• #13

Re,
D'un coup je reviens 50 ans en arrière quand j'étais en Terminale E à l'époque.
C c'était pour les balèzes !!!!
Pour le fun j'ai été voir Wikipedia. Je n'ai plus rien compris et j'ai refermé illico presto. Ce n'est plus de mon âge, comme bien d'autres choses hélas ou tant mieux 🙂

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 29 Mars 2020

• #14

Re,
Laissons le choix à Alexandre,
En PJ avec et sans arrangements.

 

Pièces jointes

• Tri2LettresAvecEtSansArrangements.xlsm

  27.8 KB · Affichages: 3

Vote positif 0 Vote négatif

Solution

Staple1600

XLDnaute Barbatruc

• 29 Mars 2020

• #15

Re

[aparté]

VB:

Sub ExcelParleMalLesMaths()
X = 14
Y = 2
mess = "PERMUTATION=" & vbTab & Evaluate("PERMUT(" & X & "," & Y & ")") & vbCr
mess = mess & "PERMUTATIONA=" & vbTab & Evaluate("PERMUTATIONA(" & X & "," & Y & ")") & vbCr
mess = mess & "COMBIN=" & vbTab & Evaluate("COMBIN(" & X & "," & Y & ")") & vbCr
mess = mess & "COMBINA=" & vbTab & Evaluate("COMBINA(" & X & "," & Y & ")")
MsgBox mess, vbExclamation, Y & " parmi " & X
End Sub

[/aparté]

 

Vote positif 0 Vote négatif