Alle Kombinationen ausgeben

[Kegasetu]

Zitat von Michael II:

Die beschriebene Rekursion findest du in

function bewerte( brett : TBrett ; n, k : integer ) : TRes; Du kannst ja mal im Debugger einen Breakpoint setzen am Anfang der Funktion und dann durchsteppen, damit du in etwa siehst was abläuft.

Jedes Mal, wenn in bewerte eine neue Kombination gefunden worden ist wird
function meingebewertungsfunktion( brett : TBrett) : TRes; aufgerufen. In dieser Funktion nimmst du die Bewertung vor. Die gefundene Kombination findest du im Array brett.wo.

Du fragst, was ein record ist - da liest du am besten kurz im Hilfe zu Delphi. Im Wesentlichen ist es eine Zusammenfassung von Variablen.

Zitat:

Und die Hoffung des es irgendwie mit einem simplen Array funktionert ist nach wie vor da

Genau diesen simplen Array hast du in brett.wo.

Hättest du vielleicht ein Beispiel mit 5 Halterungen und 20 Plätzen? Und als Ausgabe dann eine simple showMessage mit den Werten

[Michael II]

Zitat von Kegasetu:

Hättest du vielleicht ein Beispiel mit 5 Halterungen und 20 Plätzen? Und als Ausgabe dann eine simple showMessage mit den Werten

Das Beispiel (siehe Link von oben) arbeitet mit 4 Halterungen und 10 Plätzen. Du kannst das leicht anpassen. Spiel's doch mal mit den 4 aus 10 durch. Du musst vorher nur noch in der Bewertungsfunktion meingebewertungsfunktion festlegen welche Kombination gut für dich ist und welche nicht. Danach lässt du das Programm laufen und eine beste Lösung wird berechnet.

[Kegasetu]

Zitat von Michael II:

Zitat von Kegasetu:

Hättest du vielleicht ein Beispiel mit 5 Halterungen und 20 Plätzen? Und als Ausgabe dann eine simple showMessage mit den Werten

Das Beispiel (siehe Link von oben) arbeitet mit 4 Halterungen und 10 Plätzen. Du kannst das leicht anpassen. Spiel's doch mal mit den 4 aus 10 durch. Du musst vorher nur noch in der Bewertungsfunktion meingebewertungsfunktion festlegen welche Kombination gut für dich ist und welche nicht. Danach lässt du das Programm laufen und eine beste Lösung wird berechnet.

Okay, ich probiere es morgen mal durch.

Eine Frage noch, wie wird das ganze getartet? Ich benutzte normalerweise nur eine Button.

[Kegasetu]

Zitat von Kegasetu:

Eine Frage noch, wie wird das ganze getartet? Ich benutzte normalerweise nur eine Button.

Mein Fehler, weiter unten steht es.

[Kegasetu]

Zitat von Michael II:

Zitat von Kegasetu:

Hättest du vielleicht ein Beispiel mit 5 Halterungen und 20 Plätzen? Und als Ausgabe dann eine simple showMessage mit den Werten

Das Beispiel (siehe Link von oben) arbeitet mit 4 Halterungen und 10 Plätzen. Du kannst das leicht anpassen. Spiel's doch mal mit den 4 aus 10 durch. Du musst vorher nur noch in der Bewertungsfunktion meingebewertungsfunktion festlegen welche Kombination gut für dich ist und welche nicht. Danach lässt du das Programm laufen und eine beste Lösung wird berechnet.

Der Code funktioniert so weit. Nun bekomme ich aber das Problem, wenn ich mehr als 13 Stellen am Brett habe bekomme ich den Fehler: stack overflow

Es sollte schon möglich sein so um die 200 Stellen besetzten zu können.

[Kegasetu]

Zitat von Kegasetu:

Zitat von Michael II:

Zitat von Kegasetu:

Hättest du vielleicht ein Beispiel mit 5 Halterungen und 20 Plätzen? Und als Ausgabe dann eine simple showMessage mit den Werten

Das Beispiel (siehe Link von oben) arbeitet mit 4 Halterungen und 10 Plätzen. Du kannst das leicht anpassen. Spiel's doch mal mit den 4 aus 10 durch. Du musst vorher nur noch in der Bewertungsfunktion meingebewertungsfunktion festlegen welche Kombination gut für dich ist und welche nicht. Danach lässt du das Programm laufen und eine beste Lösung wird berechnet.

Der Code funktioniert so weit. Nun bekomme ich aber das Problem, wenn ich mehr als 13 Stellen am Brett habe bekomme ich den Fehler: stack overflow

Es sollte schon möglich sein so um die 200 Stellen besetzten zu können.

Das Problem hat sich auch geklärt. Ich werde mich jetzt mal ransetzten alles zusammen zuwürfeln.

[Michael II]

Zitat von Kegasetu:

Der Code funktioniert so weit. Nun bekomme ich aber das Problem, wenn ich mehr als 13 Stellen am Brett habe bekomme ich den Fehler: stack overflow

Es sollte schon möglich sein so um die 200 Stellen besetzten zu können.

Wie du später gemerkt hast, gibt's keinen Stack Overflow.

Wenn du aber echt mit 200 Stellen rechnen lassen willst, dann musst du dir bewusst sein, dass das Aufzählen aller möglichen Kombinationen länger dauern kann als wir alle warten können. Beispiel n=200 Stellen und an k=100 Stellen was reinhängen: 9.054851465610329e+58 mögliche Kombinationen.
(Alle Zahlenkombinationen aus Lotto k=6 aus n=49 :13983816)

Kurz: Für grosse n musst du andere Wege gehen.

[Kegasetu]

Zitat von Michael II:

Zitat von Kegasetu:

Der Code funktioniert so weit. Nun bekomme ich aber das Problem, wenn ich mehr als 13 Stellen am Brett habe bekomme ich den Fehler: stack overflow

Es sollte schon möglich sein so um die 200 Stellen besetzten zu können.

Wie du später gemerkt hast, gibt's keinen Stack Overflow.

Wenn du aber echt mit 200 Stellen rechnen lassen willst, dann musst du dir bewusst sein, dass das Aufzählen aller möglichen Kombinationen länger dauern kann als wir alle warten können. Beispiel n=200 Stellen und an k=100 Stellen was reinhängen: 9.054851465610329e+58 mögliche Kombinationen.
(Alle Zahlenkombinationen aus Lotto k=6 aus n=49 :13983816)

Kurz: Für grosse n musst du andere Wege gehen.

Das Problem bin ich auch schon durchgegangen. Es gilt, k ist maximal 13 und zudem gibt es mehrere Möglichkeiten die passend sind, die Lösung liegt vermutlich im ersten zehntel der Zeit.

[Michael II]

Dann bist du bei maximal n=200 für maximal k=13 bei maximal 88326646952501950000 . Viel Glück

[Andreas13]

Sorry Kegasetu für meine böse Bemerkung: Aber ohne mathematische Kenntnisse kann man kein vernünftiges Computerprogramm "programmieren".
Die von Michael II genannte Aufzählung von 88326646952501950000 Varianten würde auf einem extrem starken PC (sagen wir großzügig 1 Milliarde Operationen pro Sekunde) über 2,8 TAUSEND Jahre dauern…
Denk mal darüber nach!
Gruß, Andreas