Sudoku-Zahlen mischen[gelöst]

[McCry]

Hi,
ich muss von der Schule aus ein Sudoku programmieren(ohne Lazarus).
Bis zur nächsten Stunde soll ich soweit sein, dass das Programm die Zahlen in dem Array"SFELD" von alleine mischt.
Zurzeit werden die Zahlenreihen einfach nur um drei Felder nach Links Verschoben.

Hoffe ihr habt nen vernünftigen Weg das zu lösen.
LG McCry

[af0815]

Ist das hier (Sudoku, Delphi Programmierpraktikum) für dich ein Ansatz ?

[mschnell]

Wenn Du das selber programmieren willst und nicht irgendwo abkupfern, hier ein paar Stichpunkte für einen sehr allgemein verwendbaren Ansatz:

Zufallszahlen ziehen (Standard library-Funktion) ) und in eine TList von Records oder Objekten schreiben. Jedes Objekt besteht aus der Zufallszahl und einer Kennung für das Ziel-Element (z.B. das Sudoku-Feld). Die Kennungen natürlich auch in die Records schreiben.

Dann das Feld (mit der TList-Standard-Funktion) nach den Zufallszahlen sortieren und Du hast deine Element-Liste in zufälliger Reihenfolge.

Da der QuickSort-Algorithmus sehr flott ist und beim Sortieren der TLIst nur die Pointer und nicht die Elemente selbst geschrieben werden, ist das vermutlich schneller, als die meisten anderen Verfahren.

-Michael

[martin_frb]

Hi,
ich muss von der Schule aus ein Sudoku programmieren(ohne Lazarus).
Bis zur nächsten Stunde soll ich soweit sein, dass das Programm die Zahlen in dem Array"SFELD" von alleine mischt.
Zurzeit werden die Zahlenreihen einfach nur um drei Felder nach Links Verschoben.

Was genau, darf man denn unter "mischen" verstehen?

1) Befindet sich in dem Array, ein gültiges Soduko? (mit allen Zahlen / ohne Lücken?)
2) Soll ein vorher leeres Array korrekt befüllt werden?

1a) Soll es nach dem mischen immer noch gültig seien, oder wird das nach der nächsten Stunde implementiert?

Man kann rein zufällig mischen (und Gültigkeit pruefen) oder man kann tricksen.
In einem gültigen array lassen sich bestimmte Operationen immer durchführen:

Vertauschen zweier kompletter Spalten/Zeilen, wenn diese in den selben Quadranten liegen. Z.B.
R1<>R2
R2<>R3
R4<>R5
aber NICHT R1<>R4 R1 geht durch die ganz linken Quadranten, R4 geht durch die mittleren Quadranten.


Oder, in spezial Fällen, lassen sich ausgewählte Paare in solchen Reihen/Spalten tauschen.
Alle getauschten Paare sind jeweils komplett in eienm quadrant, sowohl einer Spalte. Lediglich Reihen werden geändert, sind aber nach der Änderung wieder korrekt

Code: Alles auswählen

1  2 [3]   4  5 [6]   7  8 [9]
 4  5 [6]   7  8 [9]   1  2 [3]
 7  8  9    1  2  3    4  5  6
 
 2  3  4    5  6  7    8  9  1
 5  6  7    8  9  1    2  3  4
 8  9  1    2  3  4    5  6  7
 
 3  4  5    6  7  8    9  1  2
 6  7  8    9  1  2    3  4  5
 9  1  2    3  4  5    6  7  8

[camper3000]

Mal davon ausgegangen das das entsprechende Array schon gefüllt ist, machst du einfach ne Zählschleife und vertauschst 10000 mal zwei Zufällige Elemente des Arrays.
gemischt. (Unter FormCreate nicht Randomize; vergessen)

mfg camper3000

[mschnell]

Ich bin davon überzeugt, dass Quicksort (s.o.) da viel effektiver ist.

-Michael

[camper3000]

Was willstn da sortieren?
Und warum quicksort?
Warum nicht Herbsort?
Bei der kleinen Menge könnte man auch Bubblesort nehmen...
Aber das mit dem Zeilen vertauschen ist eig die beste Lösung

Na dann, viel Glück!