Anonymous user
Round-robin tournament schedule: Difference between revisions
→{{header|uBasic/4tH}}
imported>Thebeez |
imported>Thebeez |
||
Line 1,426:
Next
For c@ = 1 To a@-1 ' print the pairings according to the scheme
Print Using "Round __: ";c@;
' 1 2 3 4
For d@ = 1 To
Print "("; Show(FUNC(_Nob (a@, @(d@), b@)));" - ";
Print Show(FUNC(_Nob (a@, @(d@+a@/2), b@)));") ";
Next
e@ = @(a@/2) ' need to track two temporary variables
f@ = @(a@/2+1)
|