Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Kobinierungs-Algorithmus gesucht (https://www.delphipraxis.net/121384-kobinierungs-algorithmus-gesucht.html)

violinenspieler1000 26. Sep 2008 14:20


Kobinierungs-Algorithmus gesucht
 
Hallo,

ich suche eine möglichst kurze Delphi-Umsetzung eines Algorithmuses, der bei einer gegebene Zahl X alle Zahlen miteinander in allen Möglichkeiten kombiniert und das Ergebnis in ein 2 dimensionales Array speichert:

Bsp:

x=3:

1-2-3
1-3-2
2-1-3
2-3-1
3-1-2
3-2-1


So und das soll jetzt möglichst einfach in eine Delphi-Prozedur umgesetzt werden (für variable X).
Irgendwelche Vorschläge?

Danke,
Thomas

Nikolas 26. Sep 2008 14:21

Re: Kobinierungs-Algorithmus gesucht
 
das nennt sich Permutation.

DeddyH 26. Sep 2008 14:22

Re: Kobinierungs-Algorithmus gesucht
 
Und Crossposts bitte in Zukunft kenntlich machen.

violinenspieler1000 26. Sep 2008 16:20

Re: Kobinierungs-Algorithmus gesucht
 
Danke, ich habe verschiedene Artikel dazu im Internet gefunden, habe aber leider nichts brauchbares gefunden.

Hoffe auf weitere Hilfe.

Vielen Dank,
Thomas

negaH 26. Sep 2008 16:31

Re: Kobinierungs-Algorithmus gesucht
 
http://www.delphipraxis.net/internal...561&highlight=

Gruß Hagen

Marc. 26. Sep 2008 16:35

Re: Kobinierungs-Algorithmus gesucht
 
Alternativen:
http://www.delphipraxis.net/internal...ht=permutation

Grüße,
Marc

Uwe Raabe 26. Sep 2008 17:22

Re: Kobinierungs-Algorithmus gesucht
 
Ich weiß nicht, ob das Speichern in einem Array eine gute Idee ist. Selbst wenn du nur Bytes in dem Array speicherst, brauchst du bei x = 10 schon ca. 32MB! Das ist ein Array mit 3628800 Zeilen und 10 Spalten.

Bei x = 15 macht das schon ca. 20TB Speicher!

Über die Laufzeit kann man sich dabei sicher noch später Gedanken machen...


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:48 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz