Games :: Sudoku :: Solver Solve 9x9-Sudokus recursief
Download nu

Games :: Sudoku :: Solver Rangschikking & Samenvatting

Games :: Sudoku :: Solver Tags

puzzel Perl-module perl Sudoku-puzzel sudoku puzzeloplosser

Games :: Sudoku :: Solver Beschrijving

Solve 9x9-Sudokus recursief Spellen :: Sudoku :: Solver is een Perl-module die 9x9-Sudoku-puzzels oplost door recursie. Er is geen beperking aan de moeilijkheidsgraad en het aantal oplossingen.De puzzel kan worden opgeslagen in een enkele dimensie-array of in een bestand, waar onbekende cellen worden gepresenteerd door nullen of punten. Synopsis Gebruik Games :: Sudoku :: Solver QW (: Minimale set_solution_max count_occupied_cells); # Specificeer een Sudoku als platte array (deze heeft 10 oplossingen) My @Sudoku_RAW = QW (04 00 20 90 00 00 00 00 10 00 00 06 85 05 82 30 07 00 00 08 07 00 00 09 00 51 38 09 71 00 00 00 20 00 00 00 00 04 03 00 00); mijn @sudoku; # de sudoku-gegevensstructuur mijn @solution; # De oplossingsgegevensstructuur sudoku_set (\ @sudoku, \ @sudoku_raw); # RAW converteren naar interne vertegenwoordiging Afdrukken "\ N ===== Sudoku ===== \ N"; Sudoku_Print (\ @sudoku); # Print de Sudoku mijn $ cellen_occupied = count_occupied_cells (\ @sudoku); # Sommige statistieken afdrukken "\ n", $ cellen_occupied, "cellen bezetten", 81- $ cellen_occupied, "cellen gratis \ N"; set_solution_max (4); # Stop met het hebben van 4 oplossingen gevonden My $ Solutions = Sudoku_Solve (\ @ @sudoku, \ @solution); # Los de Sudoku Foreach op My $ N (1 .. $ Solutions) {# Print de oplossingen Print "\ N --- Oplossing $ N --- \ N"; sudoku_print ($ oplossing ); } Vereisten: · Perl Beperkingen: · Deze module kan alleen 9x9-Sudokus oplossen. Er zijn geen bugs gemeld.

Games :: Sudoku :: Solver Gerelateerde software