Forum: Programmieren allgemein
by alzaimar,
7. Okt 2006
Um mal meinen Senf dazuzugeben, hier die kurze Version. Ich find sie auch elegant, vor allen Dingen, weil Sie als Abfallprodukt eines anderen Problems enstanden ist. Davor habe ich mich mit Inversen und Graycodes beschäftigt, um Permutationen zu erzeugen, aber das ist ein anderes Thema.
Type
TCharSet = Set Of Char;
Procedure TForm1.Permutation(Const aString, aResult : String; anIndex...
Forum: Programmieren allgemein
by alzaimar,
6. Okt 2006
Also, ich habe eine Liste, die ich in allen möglichen Kombinationen zusammenstellen will.
Na denn:
Erzeuge alle Permutationen (Liste L, bisherige Lösung)
Für jedes Element E in der Liste L
Wenn E noch nicht in der bisherigen Lösung enthalten ist, dann
Wenn E das letzte noch nicht verwendete Element der Liste ist, dann
Ist eine Permutation
ansonsten
Erzeuge...