Lotto Systemspiele berechnen

[wurzelzwerg]

Vielen Dank schon mal.

@Bjoerg
Wies aussieht erzeugst du Zufallstipps.
Ich wollte z.B. System 007
Eingabe: 1, 2, 3, 4, 5, 6, 7
Ergebnis:
1,2,3,4,5,6
1,2,3,4,5,7
1,2,3,4,6,7
1,2,3,5,6,7
1,2,4,6,5,7
1,3,4,5,6,7
2,3,4,5,6,7

Also aus 7-16 vorgegenen Zahlen alle möglichen Kombinationen errechnen.

Zu VEW:
Sind das bei System VEW vorgegebene Kombinationen die nicht errechnet werden, also irgenwo definiert werden müssen?

[Bjoerk]

Zitat von wurzelzwerg:

Vielen Dank schon mal.

@Bjoerg
Wies aussieht erzeugst du Zufallstipps. ...

Siehe Button3Click.

[wurzelzwerg]

Ja, ok die Stelle zum setzen der Zahlen ist klar, danke.
Aber warum das J:= Random(FList.Count) in GetTipps?
Ich habe mal versucht immer den letzten Eintrag der Liste zu nehmen (J:= FList.Count-1),
das ergibt aber eine Endlosschleife.

[Bjoerk]

Wenn Count beispielsweise 5 ist liefert Random(Count) eine Zahl zwischen null und vier. Count ändert sich auch immer, weil jeweils ein Item aus FList heraus gelöscht wird.

[wurzelzwerg]

Schon klar was count liefert, aber warum nimmst du Zufallszahlen an der Stelle?
Dass J:= FList.Count-1 dort nicht funktioniert versteh ich nicht, müsste doch Zahlen von x..0 liefern.

[Bjoerk]

Bei Random(Count-1) würde ein Item fehlen.
Schau dir mal LottoTipp.GetTipp an, ist einfacher zu verstehen.

[MrSpock]

Also hier mal das, was ich mit n_aus_m meinte. Eine schnuckelige rekursive Prozedur, die das Vollsystem erzeugt