-= Tutorial erweitern =- Sortiermethoden von Buchstaben Tip

[Master-Joko]

Hallo DP'ler

ich habe mir etliche Hilfen und Tipps gesucht, wie ich mein Projekt sinnvoll beenden kann.
Ebenfalls habe ich etlich Anläufe genommen, meine Idee um zu setzen, und bin dennoch an der Realisierung
der Sortiermethode, bzw. an der Rekursion gescheitert, da ich nicht zu den Delphi-Spezies gehöre.

Ich habe nach Rekursion und Sortieralgorythmen gegoogled, bzw. mich auf entsprechenden Foren umgesehen, aber nichts entsprechendes gefunden, was mir bei der Lösung meines Problems weiter hilft.

Nun zum eigentlichen Problem, was evtl. auch andere haben, evtl. in einer anderen Form.

Ich lese regelmäßig die ortsübliche TagesZeitung worin sich in der Sonntags Ausgabe ein nettes 3x3 Rätsel befindet.

Dort sind NUR 9 Buchstaben (wobei sich auch manche wiederholen) vorgegeben, die in 3x3 Feldern vorgegeben sind.

Nun meine Idee:

ich schreibe ein programm, wo ich diese buchstaben in neun edit-felder eingeben kann, und per buttonklick alle möglichen kombinationen in einem z.b. memo ausgegeben werden.

hier kann ich jedoch nicht die üblichen sortier-methoden verwenden.

die Frage ergibt sich also aus meinem Problem: Wie gehe ich an die Sortierung heran:

ABCDEFGHI --> B(A)CDEFGHI --> BC(A)DEFGHI --> BCD(A)EFGHI ... usw.

was mich doch ein wenig verwundert, das solche sortiermethoden nicht schon als prozedur oder ähnliches als standard vorhanden sind.

es sieht auch ein wenig nach einer binäraufzählung aus, nur ein wenig komplizierter
like:

01, 10, 11, 101, 110, 111, 1001, 1010, 1011... usw.

daher meine Frage, ob sich diesem Problem mal die Spezies hier im Board sich das annehmen, und ein Tut zur Lösung des Problems eine Hilfestellung schreiben könnten.

Nein,. ich will keinen kompl. Source, sondern Tipps und Tricks, wie man an die Lösung heran geht, bzw. wie man diese Art der Sortierung lösen kann.

Ich hoffe, das das alles hier recht verständlich geschrieben worden ist.

Bin auch auf die Antworten gespannt.

mfg Joko

[xineohp]

moin,

wenn ich das jetzt richtig verstanden haben, dann geht es hier nicht ums Sortieren. Gefragt ist schlicht eine Permutation von 9 gegebenen Zeichen?!

Es währe villeicht kein Fehler zu erläutern, was das Ziel dieses Rätsels ist, sprich was mit den gefundenen Kombinationen erreicht werden soll, die sich bei 9 Buchstaben immerhin auf 9!=362880 Möglichkeiten belaufen.

[glkgereon]

aus diesem rätsel sollen soviele wörter wie möglich gemacht werden, und es gibt ein wort was alle 9 beinhaltet

es gibt eine punktestaffelung für 4-9 buchstaben, man kann glaub ich bisn zu 250 punkte erreichen oder so

nur was das mit sortieren zu tun hat peil ich auch nicht...

also dir permutationen sähen in etwa sio aus:

programmteil xyz kriegt i
mach 9 mal mit j
setze i te stelle auf j ten buchstaben
ruf xyz wieder mit i + 1 auf
und wenn dann zufällig gerade die letzte stelle gefüllt wurde könnte man sich überlegen den kram auszugeben


so, als besonder schwierigkeit habbich keinen pascalcosde genommen und nicht gezeigt was in die schleife gehört, uns nicht, das is dann was für dich zu denken

naja, aber den rest kannst du selbst machen....du wolltest ja keinen code

[ibp]

auch wenn du nur einen tipp wolltest hier mal ein teil von mir was ich mal gebraucht habe...

Delphi-Quellcode:

procedure Permutation(p, s : String);
var
  i,l: byte;
begin
  l:=length(s);
  if l = 1 then
    Memo1.Lines.Add(p+s) // neue Permutation schreiben
  else
    for i := 1 to l do
       Permutation(p+s[i],copy(s,1,i-1)+copy(s,i+1,l-i));
end;

...
  Permutation('','ABCDEFG'); // aufruf
...