N-queens problem: Difference between revisions

N-queens problem (view source)

Revision as of 01:44, 14 September 2018

9 bytes added , 5 years ago

m

→‎{{header|REXX}}: used a better dithering when showing a queen on a black square.

Anonymous user

rosettacode>Gerard Schildberger

Revision as of 01:37, 14 September 2018 (view source) rosettacode>Gerard Schildberger m (→‎{{header\|REXX}}: increased whitespace in the use of the OUTPUT template.) ← Older edit		Revision as of 01:44, 14 September 2018 (view source) rosettacode>Gerard Schildberger m (→‎{{header\|REXX}}: used a better dithering when showing a queen on a black square.) Newer edit →
Line 8,675: say 'A solution for ' N " queens:"; g=substr( copies("╬═══", N) ,2); say say pad translate('╔'g"╗", '╦', "╬") /display the top rank (of the board)./ line = '╠'g"╣"; dither= "▒▓"; ditherQ= '░' /define a line (bar) for cell boundary/ bar = '║' ; queen = "Q" /kinds: horizontal, vertical, salad. / Bqueen = ~~dither~~ditherQ \|\| queen \|\| ~~dither~~ ditherQ /glyph befitting a black─square queen./ Wqueen = ' 'queen" " /* " " " white─square " / do rank=1 for N; if rank\==1 then say pad line; _= /display sep for rank.*/ Line 8,705: ╔═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╗ ║ Q ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒Q▒║~~║░Q░║ ~~║▒▒▒║~~║▓▓▓║ ║ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒Q▒║~~║░Q░║ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ Q ~~║▒▒▒║~~║▓▓▓║ ║ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ~~║▒▒▒║~~║▓▓▓║ Q ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒Q▒║~~║░Q░║ ║ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ~~║▒Q▒║~~║░Q░║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ Q ~~║▒▒▒║~~║▓▓▓║ ~~║▒▒▒║~~║▓▓▓║ ║ ╚═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╝ </pre> {{out\|output\|text=  when using   '''20'''x'''20'''   chessboard with the input of:     <tt> 20 </tt>}} <pre> A solution for 20 queens: ╔═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╦═══╗ ║ Q ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ~~║ Q ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║▓▓▓║ ║░Q░║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║ ~~║▒▒▒║ ║▒Q▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ║▓▓▓║ ║▓▓▓║ Q ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ~~║ ║▒▒▒║ ║▒▒▒║ Q ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║▓▓▓║ Q ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║ ~~║▒▒▒║ Q ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ║▓▓▓║ ║░Q░║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ~~║ ║▒▒▒║ ║▒Q▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║░Q░║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║ ~~║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒Q▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ Q ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ~~║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ Q ║▒▒▒║ ║▒▒▒║ ║▒▒▒║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ Q ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║ ~~║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ Q ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║░Q░║ ║▓▓▓║ ~~║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒Q▒║ ║▒▒▒║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ Q ║ ~~║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ Q ║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ Q ║▓▓▓║ ║▓▓▓║ ~~║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ Q ║▒▒▒║ ║▒▒▒║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║░Q░║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║ ~~║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒Q▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║░Q░║ ║▓▓▓║ ║▓▓▓║ ~~║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒Q▒║ ║▒▒▒║ ║▒▒▒║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║░Q░║ ║ ~~║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒Q▒║ ║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║░Q░║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ~~║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒Q▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ Q ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║ ~~║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ Q ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ Q ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ~~║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ Q ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ Q ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║ ~~║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ Q ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║ ║▓▓▓║ ║▓▓▓║ ║░Q░║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ~~║ ║▒▒▒║ ║▒▒▒║ ║▒Q▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║~~ ╠═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╬═══╣ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║░Q░║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║▓▓▓║ ║ ~~║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒Q▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║▒▒▒║ ║~~ ╚═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╩═══╝ </pre>