aprile 2012 Blog Posts
L’algoritmo di Berger, ideato dallo scacchista austriaco Johann Berger , è un metodo procedurale per stilare un calendario (diviso in giornate) di un torneo sportivo svolto con il sistema del “girone all’italiana ” composto da un qualsiasi numero di concorrenti o squadre.
Ecco la traduzione in Vb.Net:
Private Function CreaCalendario(Squadre() As String) As String
Dim buffer As String = ""
Dim numero_squadre As Integer = Squadre.Length
Dim giornate As Integer = numero_squadre - 1
Dim casa(0) As String
Dim trasferta(0) As String
Array.Resize(casa, numero_squadre / 2)
Array.Resize(trasferta, numero_squadre / 2)
For i As Integer = 0 To (numero_squadre / 2) - 1
...