Weinfässer-Verteilung

Aufgabe:

Eine Lösung als Tabelle (manuell ausgeglichen):

Es ist schnell klar, dass jedes Kind Wein in der Menge von 7 halbvollen Fässern bekommen muss.

neuwirtwf.png

Prototyp (Code):

g1:x11+x12+x13=7$
g2:x21+x22+x23=7$
g3:x31+x32+x33=7$
g4:2*x11+x12=7$
g5:2*x21+x22=7$
g6:2*x31+x32=7$
g7:x11+x21+x31=7$
g8:x12+x22+x32=7$
g9:x13+x23+x33=7$
l:solve([g1,g2,g3,g4,g5,g6,g7,g8,g9],\
[x11,x12,x13,x21,x22,x23,x31,x32,x33])$
l1:l,%r1=1,%r2=1$
l2:l,%r1=5,%r2=1$
display(l1)$
display(l2)$

wxMaxima:

weinverteilung
Auch hier habe ich noch nachgeholfen. Das Programm muss also noch verbessert werden!