read GOALS:
N:=6:
for n from 3 to N do
lu:=MagicSoccerPol(n,r):
print(``):
print(`-------------------------------`):
print(``):
print(`The number of possible ways where`, n, `teams can play Soccer with each other, and each team had exactly`, r, `Goals For`):
print(`and exactly`, r, `Goals against, is given by the following POLYNOMIAL of degree`, degree(lu,r)):
print(``):
print(lu):
print(``):
print(`and in Maple input form:`):
print(``):
lprint(lu):
print(``):
od:
print(`This took`, time(), `seconds. `):
quit: