Hallo Andreas,
Gibt es daran irgendetwas auszusetzen?
Probier mal calculate(400,$pkg);
Das fuehrt bei mir zu folgendem Ergebnis:
1 Package á 50 Dives
1 Package á 50 Dives
1 Package á 50 Dives
1 Package á 50 Dives
1 Package á 50 Dives
1 Package á 50 Dives
1 Package á 50 Dives
1 Package á 50 Dives
0 single Dives
Also 8 x das 50er Paket. So ist es ja richtig.
Für die kleineren Pakete ist das _in deinem speziellen Fall_ nicht nötig, weil die restlichen Pakete zufällig nicht mehr als einmal in das jeweils nächstgrößere Paket passen.
Gluecklicherweise ;)
mfg
Matthias