洛谷1219 八皇后

2021-07-09 02:17:05 字數 1513 閱讀 4467

www.luogu.org

原網頁

題目描述

檢查乙個如下的6 x 6的跳棋棋盤,有六個棋子被放置在棋盤上,使得每行、每列有且只有乙個,每條對角線(包括兩條主對角線的所有平行線)上至多有乙個棋子。 

上面的布局可以用序列2 4 6 1 3 5來描述,第i個數字表示在第i行的相應位置有乙個棋子,如下: 

行號 1 2 3 4 5 6 

列號 2 4 6 1 3 5 

這只是跳棋放置的乙個解。請編乙個程式找出所有跳棋放置的解。並把它們以上面的序列方法輸出。解按字典順序排列。請輸出前3個解。最後一行是解的總個數。 

//以下的話來自usaco官方,不代表洛谷觀點

特別注意: 對於更大的n(棋盤大小n x n)你的程式應當改進得更有效。不要事先計算出所有解然後只輸出(或是找到乙個關於它的公式),這是作弊。如果你堅持作弊,那麼你登陸usaco training的帳號刪除並且不能參加usaco的任何競賽。我警告過你了!輸入格式:乙個數字n (6 <= n <= 13) 表示棋盤是n x n大小的。

輸出格式:前三行為前三個解,每個解的兩個數字之間用乙個空格隔開。第四行只有乙個數字,表示解的總數。

輸入樣例#1:

6
輸出樣例#1:

2 4 6 1 3 5

3 6 2 5 1 4

4 1 5 2 6 3

4

題目翻譯來自nocow。

usaco training section 1.5

題解

這道題再熟悉不過了吧。

**var

ans,n:longint;

p,b,c,d:array[-100..2000] of longint;

procedure nn(t:longint);

var

i:longint;

begin

if t>n then

begin

if ans<3 then begin for i:=1 to n-1 do write(p[i],' ');writeln(p[n]);end;

inc(ans);

exit;

end;

for i:=1 to n do

if (b[i]=0)and(c[i+t]=0)and(d[t-i]=0) then

begin

p[t]:=i;

b[i]:=1;c[i+t]:=1;d[t-i]:=1;

nn(t+1);

b[i]:=0;c[i+t]:=0;d[t-i]:=0;

end;

end;

begin

ans:=0;

readln(n);

nn(1);

writeln(ans);

end.

洛谷 P1219 八皇后

題目描述 檢查乙個如下的6 x 6的跳棋棋盤,有六個棋子被放置在棋盤上,使得每行 每列有且只有乙個,每條對角線 包括兩條主對角線的所有平行線 上至多有乙個棋子。上面的布局可以用序列2 4 6 1 3 5來描述,第i個數字表示在第i行的相應位置有乙個棋子,如下 行號 1 2 3 4 5 6 列號 2 ...

洛谷 P1219 八皇后

題目描述 檢查乙個如下的6 x 6的跳棋棋盤,有六個棋子被放置在棋盤上,使得每行 每列有且只有乙個,每條對角線 包括兩條主對角線的所有平行線 上至多有乙個棋子。上面的布局可以用序列2 4 6 1 3 5來描述,第i個數字表示在第i行的相應位置有乙個棋子,如下 行號 1 2 3 4 5 6 列號 2 ...

洛谷p1219 八皇后

題目描述 檢查乙個如下的6 x 6的跳棋棋盤,有六個棋子被放置在棋盤上,使得每行 每列有且只有乙個,每條對角線 包括兩條主對角線的所有平行線 上至多有乙個棋子。上面的布局可以用序列2 4 6 1 3 5來描述,第i個數字表示在第i行的相應位置有乙個棋子,如下 行號 1 2 3 4 5 6 列號 2 ...