Einzelnen Beitrag anzeigen

Neon-chan

Registriert seit: 25. Okt 2004
24 Beiträge
 
Delphi 7 Enterprise
 
#11

Re: Mal wieder ein Sudoku Problem

  Alt 30. Jun 2006, 07:07
hmm...also die rekursive Lösung würd ich nach folgendem Ansatz machen:

rekursive Funktion mit Parametern Sudoku-Array, Anzahl freie Felder (vorm ersten Aufruf berechnen) und ne bool-Var ob schon gelöst ist

innerhalb der Funktion suchst dir das erste freie Feld, setzt eine 1 ein und überprüfst ob das Ergebnis den Regeln entspricht..wenn ja und freie Felder > 1 dann Selbstaufruf mit dem neuen Array und freie Felder -1, wenn freie Felder = 1 dann ist das Sudoku gelöst.. Danach setzt du 2-9 ein, nach der 9 oder wenn die bool-Var true ist, ist die Funktion beendet.

Wenn der Ansatz allein ned reicht sag bescheid dann gibts bischen Quellcode aus meinem Sudoku-Solver.
  Mit Zitat antworten Zitat