omaggio : è SOLO LA STRUTTURA
Sub main()
Dim N1(6),N2(6)
Dim ruota(10),ruote(10)
Dim posta(5),poste(5)
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
'TUTTE LE RUOTE
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
posta(1)=5.0
posta(2)=6.0...