【题目1】N皇后问题（八皇后问题扩展）.docVIP

【题目1】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 1#1 N皇后问题(八皇后问题的扩展) 【题目2】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 2#2 排球队员站位问题 【题目3】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 3#3 把自然数Ｎ分解为若干个自然数之和。 【题目4】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 4#4 把自然数Ｎ分解为若干个自然数之积。 【题目5】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 5#5 马的遍历问题。 【题目6】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 6#6 加法分式分解 【题目7】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 7#7 地图着色问题 【题目8】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 8#8 在n*n的正方形中放置长为2,宽为1的长条块, 【题目9】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 9#9 找迷宫的最短路径。（广度优先搜索算法） 【题目10】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 10#10 火车调度问题 【题目11】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 11#11 农夫过河 【题目12】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 12#12 七段数码管问题。 【题目13】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 13#13 把1-8这8个数放入下图8个格中,要求相邻的格(横,竖,对角线)上填的数不连续. 【题目14】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 14#14 在4×4的棋盘上放置8个棋,要求每一行,每一列上只能放置2个. 【题目15】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 15#15 迷宫问题.求迷宫的路径.(深度优先搜索法) 【题目16】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 16#16 一笔画问题 【题目17】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 17#17 城市遍历问题. 【题目18】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 18#18 棋子移动问题 【题目19】 HYPERLINK /shitixiaozai/jichu/execans2.asp \l 19#19 求集合元素问题（1,2x+1,3X+1类) ================================================================================ ================================================================================ 【题目】N皇后问题(含八皇后问题的扩展，规则同八皇后)：在N*N的棋盘上，放置N个皇后，要求每一横行每一列，每一对角线上均只能放置一个皇后，问可能的方案及方案数。 const max=8; var i,j:integer; a:array[1..max] of 0..max; {放皇后数组} b:array[2..2*max] of boolean; {/对角线标志数组} c:array[-(max-1)..max-1] of boolean; {\对角线标志数组} col:array[1..max] of boolean; {列标志数组} total:integer; {统计总数} procedure output; {输出} var i:integer; begin write(No.:4,[,total+1:2,]); for i:=1 to max do write(a[i]:3);write( ); if (total+1) mod 2 =0