Novità

Script su Metodi Cabalistici, Ciclometrici & C.

Option Explicit
Sub Main
Dim FIn,Ini,A,B,C,D,E,F,G,H,I,L,Salvo50
Dim R1,R2,P8,E1,Ind,Es1,Es2,Es3,Caso,Casi
Dim Som15,xSom1,Som1,Som1F90,SomR2,SomR2F90
FIn = EstrazioneFin
Ini = CInt(InputBox("Inserisci l'estrazione che vuoi iniziare",Salvo50,10780))
Ind = CInt(InputBox(" Quante estrazioni a ritroso per cercare Somma Cinquina? ",Salvo50,50))
' Call ScegliRange(Ini,FIn,Ini,FIn)
Scrivi Space(5) & " Somma Cinquina da Ricercare - Proposto da Capthegamer - Script Salvo50" & Space(5),1,,4,,3,,1
For Es1 = Ini To Fin
Messaggio Es1
AvanzamentoElab Ini,FIn,Es1
Caso = 0
For R1 = 1 To 12
If R1 = 11 Then R1 = 12
A = Estratto(Es1,R1,1)
B = Estratto(Es1,R1,2)
C = Estratto(Es1,R1,3)
D = Estratto(Es1,R1,4)
E = Estratto(Es1,R1,5)
Som15 = Fuori90(A + E)
If pari(Som15) Then
F = 3 * A : G = 6 * B : H = 4 * C : I = 4 * D : L = 5 * E
xSom1 = F + G + H + I + L
Som1 = xSom1/2
Som1F90 = Fuori90(Som1)
Es3 = CInt(Es1 - Ind + 1)
For Es2 = Es1 - 1 To Es3 Step - 1
For R2 = 1 To 12
If R2 = 11 Then R2 = 12
If R2 = R1 Then
SomR2 = SommaEstratti(Es2,R2)
SomR2F90 = Fuori90(SomR2)
If SomR2F90 = Som1F90 Then
Caso = Caso + 1
Casi = Casi + 1
Scrivi String(89,"-") & " Casi Totali " & FormattaStringa(Casi,"0000"),1,,,2
Scrivi String(80,"-") & " Estrazione " &(Es1) & " caso " & FormattaStringa(Caso,"0000"),1,,,1
Scrivi(" Estrazione n." & Format2(Es1) & " del " & DataEstrazione(Es1)),1,0
Scrivi " " & SiglaRuota(R1) & " ",1,0
For P8 = 1 To 5
E1 = Estratto(Es1,R1,P8)
If E1 = A Or E1 = E Then
ColoreTesto 2
Else
ColoreTesto 0
End If
Scrivi Format2(E1) & " ",1,0
ColoreTesto 0
Next
Scrivi " <-- Somma Evidenziati = " & Format2(Som15) & " PARI",1,,,2
Scrivi(" Estrazione n." & Format2(Es2) & " del " & DataEstrazione(Es2)),1,0
Scrivi " " & SiglaRuota(R2) & " " & StringaEstratti(Es2,R2),1,0
Scrivi " Somma Estratti " & SomR2 & " Fuori90 ",1,0
Scrivi SomR2F90,1,0,,2
Scrivi " Numero trovato a ritroso",1
Scrivi
Scrivi " 3 * " & Format2(A) & " = " & Format2(F) & Space(5),1,0
Scrivi " 6 * " & Format2(B) & " = " & Format2(G) & Space(5),1,0
Scrivi " 4 * " & Format2(C) & " = " & Format2(H) & Space(5),1,0
Scrivi " 4 * " & Format2(D) & " = " & Format2(I) & Space(5),1,0
Scrivi " 5 * " & Format2(E) & " = " & Format2(L) & Space(5),1
Scrivi
Scrivi " " & F & " + " & G & " + " & H & " + " & I & " + " & L & " = " & xSom1,1,0
Scrivi " / 2 = " & Som1 & " Fuori90 ",1,0
Scrivi Som1F90,1,0,,2
Scrivi " Numero da cercare a ritroso ",1
End If
End If
Next
Next
End If
If ScriptInterrotto Then Exit Sub
Next
Next
End Sub
 
Ciao Salvo e' possibile aggiungere a questo script alla somma ricercata calcolare il doppio e il triplo della cinquina.

Faccio un'esempio:

Esempio: 05/FEB/1995
CA 11.86.30.87.81 Somma con il F.90 = 25 =S2, I e V= PARI, 11+81=92
f g h i l

Applichiamo la formula di ricerca:
3*11+6*86+4*30+4*87+5*81=33+516+120+348+405=1422 : 2 =711 = 81

C)Bisogna cercare alla stessa data una estrazione la cui somma sia 81 o il diametrale 36
Alla stessa data, troviamo che l’estrazione di Roma ha la somma cercata:
RO 66.22.27.65.81 Somma con il F.90 = 81 =S1
a b c d e
 
Ciao a Tutti
Bubù
Grazie

Ciao Everita

Il raddoppio e il triplo della cinquina non l'ho fatto, perché
non ho capito di quale cinquina devono essere, della prima
quella di calcolo, oppure della seconda cioè quella trovata.
Poi cosa ci devo fare dei numeri raddoppiati e triplicati,
li visualizzo soltanto oppure servono a qualcosa?

Codice: 
Option Explicit
Sub Main
   Dim FIn,Ini,A,B,C,D,E,F,G,H,I,L,Salvo50,Diam_Som1
   Dim R1,R2,P8,E1,Ind,Es1,Caso,Casi
   Dim Som15,xSom1,Som1,Som1F90,SomR2,SomR2F90
   FIn = EstrazioneFin
   Ini = CInt(InputBox("Inserisci l'estrazione che vuoi iniziare",Salvo50,10780))
   Ind = CInt(InputBox(" Quante estrazioni a ritroso per cercare Somma Cinquina? ",Salvo50,50))
   ' Call ScegliRange(Ini,FIn,Ini,FIn)
   Scrivi Space(5) & " Modifica a Somma Cinquina da Ricercare - Script Salvo50" & Space(5),1,,4,,3,,1
   For Es1 = Ini To FIn
      Messaggio Es1
      AvanzamentoElab Ini,FIn,Es1
      Caso = 0
      For R1 = 1 To 12
         If R1 = 11 Then R1 = 12
         A = Estratto(Es1,R1,1)
         B = Estratto(Es1,R1,2)
         C = Estratto(Es1,R1,3)
         D = Estratto(Es1,R1,4)
         E = Estratto(Es1,R1,5)
         Som15 = Fuori90(A + E)
         If pari(Som15) Then
            F = 3 * A : G = 6 * B : H = 4 * C : I = 4 * D : L = 5 * E
            xSom1 = F + G + H + I + L
            Som1 = xSom1/2
            Som1F90 = Fuori90(Som1)
            Diam_Som1 = Diametrale(Som1F90)
            For R2 = 1 To 12
               If R2 = 11 Then R2 = 12
               If R2 <> R1 Then
                  SomR2 = SommaEstratti(Es1,R2)
                  SomR2F90 = Fuori90(SomR2)
                  If(SomR2F90 = Som1F90)Or(Diam_Som1 = SomR2F90) Then
                     Caso = Caso + 1
                     Casi = Casi + 1
                     Scrivi String(89,"-") & " Casi Totali " & FormattaStringa(Casi,"0000"),1,,,2
                     Scrivi String(80,"-") & " Estrazione " &(Es1) & " caso " & FormattaStringa(Caso,"0000"),1,,,1
                     Scrivi(" Estrazione n." & Format2(Es1) & " del " & DataEstrazione(Es1)),1,0
                     Scrivi " " & SiglaRuota(R1) & " ",1,0
                     For P8 = 1 To 5
                        E1 = Estratto(Es1,R1,P8)
                        If E1 = A Or E1 = E Then
                           ColoreTesto 2
                        Else
                           ColoreTesto 0
                        End If
                        Scrivi Format2(E1) & " ",1,0
                        ColoreTesto 0
                     Next
                     Scrivi " <-- Somma Evidenziati = " & Format2(Som15) & " PARI",1,,,2
                     Scrivi
                     Scrivi " 3 * " & Format2(A) & " = " & Format2(F) & Space(5),1,0
                     Scrivi " 6 * " & Format2(B) & " = " & Format2(G) & Space(5),1,0
                     Scrivi " 4 * " & Format2(C) & " = " & Format2(H) & Space(5),1,0
                     Scrivi " 4 * " & Format2(D) & " = " & Format2(I) & Space(5),1,0
                     Scrivi " 5 * " & Format2(E) & " = " & Format2(L) & Space(5),1
                     Scrivi
                     Scrivi " " & F & " + " & G & " + " & H & " + " & I & " + " & L & " = " & xSom1,1,0
                     Scrivi " / 2 = " & Som1 & " Fuori90 = ",1,0
                     Scrivi Som1F90 & " Diametrale = " & Diam_Som1,1,,,2
                     Scrivi
                     Scrivi " Cercare Nella Stessa Estrazione Altra Ruota Con Somma " & Som1F90 & " Oppure  " & Diam_Som1,1
                     Scrivi
                     Scrivi(" Estrazione n." & Format2(Es1) & " del " & DataEstrazione(Es1)),1,0
                     Scrivi " " & SiglaRuota(R2) & " " & StringaEstratti(Es1,R2),1,0
                     Scrivi " Somma Estratti " & SomR2 & " Fuori90 = ",1,0
                     Scrivi SomR2F90,1,,,2
                  End If
               End If
            Next
         End If
         If ScriptInterrotto Then Exit Sub
      Next
   Next
End Sub
 
Ultima modifica:
Ciao Salvo i numeri raddoppiati e triplicati si applicano solo sulla cinquina ricercata con il calcolo :

Applichiamo la formula di ricerca:
3*11+6*86+4*30+4*87+5*81=33+516+120+348+405=1422 : 2 =711 = 81

Bisogna cercare alla stessa data una estrazione la cui somma sia 81 o il diametrale 36
Alla stessa data, troviamo che l’estrazione di Roma ha la somma cercata:
RO 66.22.27.65.81 Somma con il F.90 = 81 =S1
a b c d e

Grazie.
 
capthegamer ha scritto:
Ciao Salvo i numeri raddoppiati e triplicati si applicano solo sulla cinquina ricercata con il calcolo :

Applichiamo la formula di ricerca:
3*11+6*86+4*30+4*87+5*81=33+516+120+348+405=1422 : 2 =711 = 81

Bisogna cercare alla stessa data una estrazione la cui somma sia 81 o il diametrale 36
Alla stessa data, troviamo che l’estrazione di Roma ha la somma cercata:
RO 66.22.27.65.81 Somma con il F.90 = 81 =S1
a b c d e

Grazie.
Clicca per espandere...
Ciao a Tutti
Ciao Everita

Quello che spieghi nel tuo ultimo post, io l'ho già fatto, quindi non ho
idea di quello che devo fare, adesso ho moltiplicato per due e per tre
la seconda cinquina e le ho visualizzate, se queste 2 cinquine vuoi che
devo svilupparle in qualche modo, prendine una qualsiasi dallo script
con nuovi numeri e fai qualche esempio nuovo in modo che io capisca
ciò che chiedi.

Codice: 
Option Explicit
Sub Main
   Dim FIn,Ini,F,G,H,I,L,Salvo50,Diam_Som1,S1,S2,Amba
   Dim R1,R2,P1,P8,E10,Ind,Es1,Caso,Casi,K,xSo2,xSo3,So1
   Dim So2,So3,Som15,xSom1,Som1,Som1F90,SomR2,SomR2F90
   Dim A0(5),A1(5),A2(5),A3(5)
   FIn = EstrazioneFin
   Ini = CInt(InputBox("Inserisci l'estrazione che vuoi iniziare",Salvo50,6474))
   ' Call ScegliRange(Ini,FIn,Ini,FIn)
   Scrivi Space(5) & " Modifica a Somma Cinquina da Ricercare - Script Salvo50" & Space(5),1,,4,,3,,1
   For Es1 = Ini To FIn
      Messaggio Es1
      AvanzamentoElab Ini,FIn,Es1
      Caso = 0
      For R1 = 1 To 12
         If R1 = 11 Then R1 = 12
         For P1 = 1 To 5
            A0(P1) = Estratto(Es1,R1,P1)
         Next
        If isNumeroValidoLotto(A0(1)) Then
            So1 = Fuori90(SommaEstratti(Es1,R1))
            Som15 = Fuori90(A0(1) + A0(5))
            If pari(Som15) Then
               F = 3 * A0(1) : G = 6 * A0(2) : H = 4 * A0(3) : I = 4 * A0(4) : L = 5 * A0(5)
               xSom1 = F + G + H + I + L
               Som1 = xSom1/2
               Som1F90 = Fuori90(Som1)
               Diam_Som1 = Diametrale(Som1F90)
               For R2 = 1 To 12
                  If R2 = 11 Then R2 = 12
                  If R2 <> R1 Then
                     '
                     For K = 1 To 5
                        A1(K) = Estratto(Es1,R2,K)'Seconda Ruota
                        A2(K) = Fuori90(A1(K) * 2)'Seconda Ruota per 2
                        A3(K) = Fuori90(A1(K) * 3)'Seconda Ruota per 3
                     Next
                     If isNumeroValidoLotto(A1(1)) Then
                        xSo2 = A2(1) + A2(2) + A2(3) + A2(4) + A2(5)
                        So2 = Fuori90(xSo2)
                        xSo3 = A3(1) + A3(2) + A3(3) + A3(4) + A3(5)
                        So3 = Fuori90(xSo3)
                        SomR2 = SommaEstratti(Es1,R2)
                        SomR2F90 = Fuori90(SomR2)
                        If(SomR2F90 = Som1F90)Or(Diam_Som1 = SomR2F90) Then
                           S1 = Fuori90((So3) +(So1))
                           S2 = Fuori90(((3 * A0(1)) + A0(2) + A0(3)) - A0(5))
                           Amba = Fuori90(S1 + S2)
                           Caso = Caso + 1
                           Casi = Casi + 1
                           Scrivi String(89,"-") & " Casi Totali " & FormattaStringa(Casi,"0000"),1,,,2
                           Scrivi String(80,"-") & " Estrazione " &(Es1) & " caso " & FormattaStringa(Caso,"0000"),1,,,1
                           Scrivi(" Estrazione n." & FormattaStringa(Es1,"00000") & " del " & DataEstrazione(Es1)),1,0
                           Scrivi " " & SiglaRuota(R1) & " ",1,0
                           For P8 = 1 To 5
                              E10 = Estratto(Es1,R1,P8)
                              If E10 = A0(1) Or E10 = A0(5) Then
                                 ColoreTesto 2
                              Else
                                 ColoreTesto 0
                              End If
                              Scrivi Format2(E10) & " ",1,0
                              ColoreTesto 0
                           Next
                           Scrivi " <-- Somma Evidenziati = " & Format2(Som15) & " PARI",1,0,,2
                           Scrivi " Somma estratti " & Format2(So1),1,,,7
                           Scrivi
                           Scrivi " 3 * " & Format2(A0(1)) & " = " & Format2(F) & Space(5),1,0
                           Scrivi " 6 * " & Format2(A0(2)) & " = " & Format2(G) & Space(5),1,0
                           Scrivi " 4 * " & Format2(A0(3)) & " = " & Format2(H) & Space(5),1,0
                           Scrivi " 4 * " & Format2(A0(4)) & " = " & Format2(I) & Space(5),1,0
                           Scrivi " 5 * " & Format2(A0(5)) & " = " & Format2(L) & Space(5),1
                           Scrivi
                           Scrivi " " & F & " + " & G & " + " & H & " + " & I & " + " & L & " = " & xSom1,1,0
                           Scrivi " / 2 = " & Som1 & " Fuori90 = ",1,0
                           Scrivi Som1F90 & " Diametrale = " & Diam_Som1,1,,,2
                           Scrivi
                           Scrivi " Cercare Nella Stessa Estrazione Altra Ruota Con Somma " & Som1F90 & " Oppure  " & Diam_Som1,1
                           Scrivi
                           Scrivi(" Estrazione n." & FormattaStringa(Es1,"00000") & " del " & DataEstrazione(Es1)),1,0
                           Scrivi " " & SiglaRuota(R2) & " " & StringaEstratti(Es1,R2),1,0
                           Scrivi " Somma Estratti " & FormattaStringa(SomR2,"000") & " Fuori90 = ",1,0
                           Scrivi Format2(SomR2F90),1,,,2
                           Scrivi
                           Scrivi " Estratti di  " & SiglaRuota(R2) & "  moltiplicati per 2  " & StringaNumeri(A2," ",True),1,0
                           Scrivi " Somma Numeri   " & FormattaStringa(xSo2,"000") & " Fuori90 = ",1,0
                           Scrivi Format2(So2),1,,,2
                           Scrivi " Estratti di  " & SiglaRuota(R2) & "  moltiplicati per 3  " & StringaNumeri(A3," ",True),1,0
                           Scrivi " Somma Numeri   " & FormattaStringa(xSo3,"000") & " Fuori90 = ",1,0
                           Scrivi Format2(So3),1,,,2
                           Scrivi
                           Scrivi "(" & Format2(So3) & " + " & Format2(So1) & " = " & Format2(S1) & ")",1,0
                           Scrivi Space(5) & "(" & Format2(F) & " + " & Format2(A0(2)) & " + " & Format2(A0(3)) & " - ",1,0
                           Scrivi Format2(A0(5)) & " = " & Format2(S2) & ")",1,0
                           Scrivi Space(5) & "(" & Format2(S1) & " + " & Format2(S2) & " = " & Format2(Amba) & ")",1
                        End If
                     End If
                  End If
               Next
            End If
         End If
         If ScriptInterrotto Then Exit Sub
      Next
   Next
End Sub
 
Ultima modifica:
Buongiorno Salvo ottimo lavoro come sempre.

Ora ti chiedo un'ultimo sforzo sempre per cortesia:

Estrazione n.6474 del 04.02.1995 CA 11 86 30 87 81 <-- Somma Evidenziati = 02 PARI

3 * 11 = 33 6 * 86 = 516 4 * 30 = 120 4 * 87 = 348 5 * 81 = 405

33 + 516 + 120 + 348 + 405 = 1422 / 2 = 711 Fuori90 = 81 Diametrale = 36

Cercare Nella Stessa Estrazione Altra Ruota Con Somma 81 Oppure 36

Estrazione n.6474 del 04.02.1995 RO 66.22.27.65.81 Somma Estratti 261 Fuori90 = 81
Estratti di RO moltiplicati per 2 42 44 54 40 72 Somma Numeri 252 Fuori90 = 72
Estratti di RO moltiplicati per 3 18 66 81 15 63 Somma Numeri 243 Fuori90 = 63
Se puoi aggiungere la somma della cinquina di Cagliari ( in questo caso ) = 25

e se puoi aggiungere il calcolo 3 x 81 ( Somma cinquina Roma ) + 25 ( somma cinquina Cagliari ) = 268 fuori 90 = 88

Estrazione di Cagliari ( F - G - H - I - L )

3 X F + G +H - L

3 X 11 + 86 + 30 - 81 = 68

88 + 68 = 156 fuori 90 = 66

Cosi per tutto lo script.

Grazie infinite in anticipo.
 
Ciao a Tutti
Ciao Everita

Lo script del Post 1187 è da riprendere,
ho aggiunto le ultime tue richieste
 
Lo script del Post 1187 è da riprendere,
Mi sono accorto che se si imposta una
data inferiore al 07-05-2005 corrispondente
all'estrazione numero 7441, lo script
faceva anche la Nazionale, che non c'erano
estrazioni, quindi faceva i calcoli con tutti zeri.
 
Allora cominciamo con l'ipotesi di conoscere solo la seconda estrazione, e cerchiamo di ricavare una prima estrazione teorica che ci permetta di costruire il quadrato Byron orignale....

Usiamo come esempio, per farvi capire tutto più facilmente, proprio la seconda estrazione originale.

La seconda estrazione : 41 - 60 - 61 - 59 - 63 (lettere rispettive : F - G - H - I - L)

La somma dei 5 estratti è (fuori 90) = 14

Facilmente ci ricaviamo il primo estratto incognito A : 90 - 14 = 76 VERO, perchè così, soddisfatta la prima equazione, automaticamente la terza verrà soddisfatta!

Quadriamo

---------------------------------------
a b c d e 41 60

b c d e 41 60 61

c d e 41 60 61 59

d e 41 60 61 59 63

e 41 60 61 59 63 XX
--------------------------------------
S S S S S S
1 2 3 4 5 6

Come possiamo vedere dalle equazioni nascoste del byron ( e ve le mostrerò tutte e sette!) Somma4+Somma5+Somma6 fanno 90, allora

(D+E+41+60+61)+(E+41+60+61+59)+(41+60+61+59+63)=90, svolgendo i calcoli abbiamo 2XE+D=53, provare per credere

Alcuni cabalisti del primo 900 hanno confermato che per un ottimo quadrato byron si verifica anche con 2XF+G = Primo futuro

Infatti 2X41+ 60 = 52. (Per la cronaca la settima somma fà 25). Pertanto scegliamo come primo futuro il 52!

Allora dato che 41(F)+ Somma delle differenze = Primo Futuro, abbiamo che 41 + SommaDifferenze = 52, quindi somma delle differenze = 11.

Se la somma delle differenze fà 11,la somma delle diferenze più la somma delle somme deve fare 90 per avere anche la prima equazione confermata!

Pertanto la somma delle somme deve fare 79...

Nel quadrato originario Byron io e Manna abbiamo ricavato la seguente identità fondamentale

(Somma1+A) - (Somma2+G) = Somma delle differenze, quindi (Somma1+76)-(14+60)=11. Somma1=11 - 02 = 09.

Allora abbiamo scoperto che la somma della prima estrazione farà 09.

Se A+B+C+D+E = 09, 76+B+C+D+E = 09, quindi b+c+d+e= 09-76= 23

Un'altra particolarità del quadrato Byron è che la somma delle prime tre somme, Somma1+Somma2+Somma3 deve coincidere con la somma delle somme,

dato che la somma delle ultime tre deve fare 90...semplice algebra...nulla di magico da nascondere...

Se B+C+D+E=23, La somma2 è b+c+d+e+41= 23+41 = 64

Somma3= Somma delle somme-(Somma1+Somma2), allora Somma3 = 79 - (64+09) = 79 - 73 = 06

Confermiamo : 09 + 64 + 06 = 79, Somma delle somme

Somma3= C+D+E+41+23 = 06, allora c+d+e=85

Se b+c+d+e=23 e c+d+e=85, abbiamo B=28

Dalla famosa diagonale (B+D+F+H+L)=90, scoperta anche in questo forum, abbiamo : 28+D+41+61+63=90, allora D=77

Infine da D+2XE=53, conoscendo la D abbiamo anche la E=33, infatti 2X33+77=53

Se non abbiamo la possibilità di fare la divisione, allora (B+D+F+H+L)=45...

L'ultima lettera la troviamo così : da c+d+e=85, c=65

Abbiamo così ottenuto la prima estrazione del famoso quadrato Byron...76 - 28 - 65 - 77 - 33....
 
Allora cominciamo con l'ipotesi di conoscere solo la seconda estrazione, e cerchiamo di ricavare una prima estrazione teorica che ci permetta di costruire il quadrato Byron orignale....

Usiamo come esempio, per farvi capire tutto più facilmente, proprio la seconda estrazione originale.

La seconda estrazione : 41 - 60 - 61 - 59 - 63 (lettere rispettive : F - G - H - I - L)

La somma dei 5 estratti è (fuori 90) = 14

Facilmente ci ricaviamo il primo estratto incognito A : 90 - 14 = 76 VERO, perchè così, soddisfatta la prima equazione, automaticamente la terza verrà soddisfatta!

Quadriamo

---------------------------------------
a b c d e 41 60

b c d e 41 60 61

c d e 41 60 61 59

d e 41 60 61 59 63

e 41 60 61 59 63 XX
--------------------------------------
S S S S S S
1 2 3 4 5 6

Come possiamo vedere dalle equazioni nascoste del byron ( e ve le mostrerò tutte e sette!) Somma4+Somma5+Somma6 fanno 90, allora

(D+E+41+60+61)+(E+41+60+61+59)+(41+60+61+59+63)=90, svolgendo i calcoli abbiamo 2XE+D=53, provare per credere

Alcuni cabalisti del primo 900 hanno confermato che per un ottimo quadrato byron si verifica anche con 2XF+G = Primo futuro

Infatti 2X41+ 60 = 52. (Per la cronaca la settima somma fà 25). Pertanto scegliamo come primo futuro il 52!

Allora dato che 41(F)+ Somma delle differenze = Primo Futuro, abbiamo che 41 + SommaDifferenze = 52, quindi somma delle differenze = 11.

Se la somma delle differenze fà 11,la somma delle diferenze più la somma delle somme deve fare 90 per avere anche la prima equazione confermata!

Pertanto la somma delle somme deve fare 79...

Nel quadrato originario Byron io e Manna abbiamo ricavato la seguente identità fondamentale

(Somma1+A) - (Somma2+G) = Somma delle differenze, quindi (Somma1+76)-(14+60)=11. Somma1=11 - 02 = 09.

Allora abbiamo scoperto che la somma della prima estrazione farà 09.

Se A+B+C+D+E = 09, 76+B+C+D+E = 09, quindi b+c+d+e= 09-76= 23

Un'altra particolarità del quadrato Byron è che la somma delle prime tre somme, Somma1+Somma2+Somma3 deve coincidere con la somma delle somme,

dato che la somma delle ultime tre deve fare 90...semplice algebra...nulla di magico da nascondere...

Se B+C+D+E=23, La somma2 è b+c+d+e+41= 23+41 = 64

Somma3= Somma delle somme-(Somma1+Somma2), allora Somma3 = 79 - (64+09) = 79 - 73 = 06

Confermiamo : 09 + 64 + 06 = 79, Somma delle somme

Somma3= C+D+E+41+23 = 06, allora c+d+e=85

Se b+c+d+e=23 e c+d+e=85, abbiamo B=28

Dalla famosa diagonale (B+D+F+H+L)=90, scoperta anche in questo forum, abbiamo : 28+D+41+61+63=90, allora D=77

Infine da D+2XE=53, conoscendo la D abbiamo anche la E=33, infatti 2X33+77=53

Se non abbiamo la possibilità di fare la divisione, allora (B+D+F+H+L)=45...

L'ultima lettera la troviamo così : da c+d+e=85, c=65

Abbiamo così ottenuto la prima estrazione del famoso quadrato Byron...76 - 28 - 65 - 77 - 33....
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 17 marzo 2026
    Bari
    49
    21
    62
    51
    47
    Cagliari
    33
    06
    44
    74
    86
    Firenze
    07
    41
    83
    38
    81
    Genova
    64
    43
    29
    73
    19
    Milano
    39
    82
    09
    41
    64
    Napoli
    88
    54
    30
    75
    38
    Palermo
    26
    28
    80
    65
    47
    Roma
    68
    62
    41
    05
    25
    Torino
    90
    17
    12
    78
    40
    Venezia
    15
    58
    12
    68
    10
    Nazionale
    08
    14
    23
    27
    70
    Estrazione Simbolotto
    Firenze
    08
    06
    07
    02
    25
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto