Round-robin tournament schedule: Difference between revisions
Added Easylang
(Added Quackery.) |
(Added Easylang) |
||
Line 511:
Round 11: ( 1 vs 2) ( 3 vs 12) ( 4 vs 11) ( 5 vs 10) ( 6 vs 9) ( 7 vs 8)
</pre>
=={{header|EasyLang}}==
{{trans|AWK}}
<syntaxhighlight>
proc roundrobin n . .
numfmt 0 2
print n & " players"
for i to n
arr[] &= i
.
if n mod 2 = 1
n += 1
arr[] &= 0
.
for i = 1 to n - 1
print ""
write "round " & i & ": "
for j = 1 to n / 2
write arr[j] & " "
.
print ""
write " "
for j = n downto n / 2 + 1
write arr[j] & " "
.
print ""
h = arr[n]
for j = n downto 3
arr[j] = arr[j - 1]
.
arr[2] = h
.
.
roundrobin 12
</syntaxhighlight>
=={{header|Go}}==
| |||