Novità

Calcolo combinazioni

alexvisco

Member
Salve
Sono alla ricerca di un metodo per creare combinazioni di cinquine con tutti i 90 numeri, in pratica dovrebbero uscire 18 schedine
Ogni schedina deve avere una cinquina senza ripetizioni, chi mi può aiutare?
 

lotto_tom75

Advanced Premium Member
Salve
Sono alla ricerca di un metodo per creare combinazioni di cinquine con tutti i 90 numeri, in pratica dovrebbero uscire 18 schedine
Ogni schedina deve avere una cinquina senza ripetizioni, chi mi può aiutare?

Non credo di aver letto bene...
Ma se è così...
E' stata molto dura... ma
eccotelo...


1-2-3-4-5-
6-7-8-9-10-
11-12-13-14-15-
16-17-18-19-20-
21-22-23-24-25-
26-27-28-29-30-
31-32-33-34-35-
36-37-38-39-40-
41-42-43-44-45-
46-47-48-49-50-
51-52-53-54-55-
56-57-58-59-60-
61-62-63-64-65-
66-67-68-69-70-
71-72-73-74-75-
76-77-78-79-80-
81-82-83-84-85-
86-87-88-89-90-
 

dbr

Advanced Member >PLATINUM PLUS<
Ciao alexvisco
Ottima soluzione di lotto_tom75.... volendo puoi sostituire i numeri aTuo piacere.
La mia proposta è una versione costruita con chiave di rotazione.
Fai sempre le dovute verifiche e valutazioni prima di giocare.

chiave 18-18-18-18-18 > sistema 90,05,02,19 = colonne 18

18 36 54 72 90
19 37 55 73 01
20 38 56 74 02
21 39 57 75 03
22 40 58 76 04
23 41 59 77 05
24 42 60 78 06
25 43 61 79 07
26 44 62 80 08
27 45 63 81 09
28 46 64 82 10
29 47 65 83 11
30 48 66 84 12
31 49 67 85 13
32 50 68 86 14
33 51 69 87 15
34 52 70 88 16
35 53 71 89 17
 

alexvisco

Member
Non credo di aver letto bene...
Ma se è così...
E' stata molto dura... ma
eccotelo...


1-2-3-4-5-
6-7-8-9-10-
11-12-13-14-15-
16-17-18-19-20-
21-22-23-24-25-
26-27-28-29-30-
31-32-33-34-35-
36-37-38-39-40-
41-42-43-44-45-
46-47-48-49-50-
51-52-53-54-55-
56-57-58-59-60-
61-62-63-64-65-
66-67-68-69-70-
71-72-73-74-75-
76-77-78-79-80-
81-82-83-84-85-
86-87-88-89-90-
Intendevo così ma con numeri misti non a sequenza progressiva...
 

alexvisco

Member
Ciao alexvisco
Ottima soluzione di lotto_tom75.... volendo puoi sostituire i numeri aTuo piacere.
La mia proposta è una versione costruita con chiave di rotazione.
Fai sempre le dovute verifiche e valutazioni prima di giocare.

chiave 18-18-18-18-18 > sistema 90,05,02,19 = colonne 18

18 36 54 72 90
19 37 55 73 01
20 38 56 74 02
21 39 57 75 03
22 40 58 76 04
23 41 59 77 05
24 42 60 78 06
25 43 61 79 07
26 44 62 80 08
27 45 63 81 09
28 46 64 82 10
29 47 65 83 11
30 48 66 84 12
31 49 67 85 13
32 50 68 86 14
33 51 69 87 15
34 52 70 88 16
35 53 71 89 17
Perfetto, come sarebbe con chiave di rotazione?
 

joe

Advanced Member >PLATINUM PLUS<
Ma giocando tutte quelle ed ognuna di quelle,

c'è una stragrande maggioranza di Ambi che saranno estratti

e che non saranno vincenti.

Quasi nel rapporto 1 a 4900.

:)
 

joe

Advanced Member >PLATINUM PLUS<
Non so ma ogni cinquina sviluppa 10 ambi e 10 terni,

Se sono 18*10, sono 180 su 4005.

Molto meno per i terni (anche più difficili e meno convenienti)

Se ci sono consigli devono venire da un grande esperto di sistemi.

:)
 

Oscar

Advanced Member >GOLD<
Forse indendevi così

02 28 44 64 78
23 42 55 63 89
19 35 40 83 86
20 34 36 41 43
14 39 68 73 85
25 54 57 65 82
10 11 24 58 71
08 09 27 52 77
12 29 38 48 49
06 32 60 70 80
18 53 56 59 76
22 72 74 81 87
01 04 47 62 88
05 16 61 66 67
07 17 30 79 84
15 21 37 50 69
03 26 33 45 75
13 31 46 51 90
 

alexvisco

Member
Forse indendevi così

02 28 44 64 78
23 42 55 63 89
19 35 40 83 86
20 34 36 41 43
14 39 68 73 85
25 54 57 65 82
10 11 24 58 71
08 09 27 52 77
12 29 38 48 49
06 32 60 70 80
18 53 56 59 76
22 72 74 81 87
01 04 47 62 88
05 16 61 66 67
07 17 30 79 84
15 21 37 50 69
03 26 33 45 75
13 31 46 51 90
Si così, quale sarebbe il metodo? è possibile fare altre miscelazioni casuali? Grazie
 

joe

Advanced Member >PLATINUM PLUS<
Codice:
'18 cinquine casuali esclusive By Joe
Option Explicit
Sub Main
  Dim K,T,Nu(90)
  Do While K < 90
    T = NumeroCasuale(1,90)
    If Nu(T) = 0 Then
      K = K + 1
      Nu(T) = T
      Scrivi Format2(T) & Space(1),0,0
      If K Mod 5 = 0 Then Scrivi
    End If
  Loop
End Sub

:)
 

joe

Advanced Member >PLATINUM PLUS<
Codice:
'9 cinquine casuali PARI esclusive By Joe
Option Explicit
Sub Main
  Dim K,T,Nu(90)
  Do While K < 45
    T = NumeroCasuale(1,90)
    If Nu(T) = 0 And pari (T) Then
      K = K + 1
      Nu(T) = T
      Scrivi Format2(T) & Space(1),0,0
      If K Mod 5 = 0 Then Scrivi
    End If
  Loop
End Sub

Per quelle DISPARI si deve AGGIUNGERE NOT (prima di) PARI nella settima linea .

:)
 
Ultima modifica:

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 07 maggio 2024
    Bari
    68
    80
    23
    56
    71
    Cagliari
    43
    74
    20
    02
    11
    Firenze
    75
    19
    18
    74
    69
    Genova
    45
    38
    26
    16
    87
    Milano
    06
    23
    72
    66
    05
    Napoli
    46
    21
    49
    80
    73
    Palermo
    15
    09
    54
    48
    49
    Roma
    06
    58
    78
    27
    31
    Torino
    78
    27
    31
    64
    74
    Venezia
    60
    47
    90
    06
    22
    Nazionale
    43
    58
    26
    18
    79
    Estrazione Simbolotto
    Milano
    17
    16
    25
    23
    43

Ultimi Messaggi

Alto