1088: [SCOI2005]扫雷Mine

1088: [SCOI2005]扫雷Mine

Time Limit: 10 Sec  Memory Limit: 162 MB
Submit: 1635  Solved: 979
[Submit][Status]

Description

相信大家都玩过扫雷的游戏。那是在一个n*m的矩阵里面有一些雷，要你根据一些信息找出雷来。万圣节到了，“余”人国流行起了一种简单的扫雷游戏，这个游戏规则和扫雷一样，如果某个格子没有雷，那么它里面的数字表示和它8连通的格子里面雷的数目。现在棋盘是n×2的，第一列里面某些格子是雷，而第二列没有雷，如下图： 由于第一列的雷可能有多种方案满足第二列的数的限制，你的任务即根据第二列的信息确定第一列雷有多少种摆放方案。

Input

第一行为N，第二行有N个数，依次为第二列的格子中的数。（1<= N <= 10000）

Output

一个数，即第一列中雷的摆放方案数。

Sample Input

2
1 1

Sample Output

2

HINT

Source

题解：本来看到扫雷一下子就像到了那个大的不得了的扫雷数字图，然后这个还要DP求种类数，QAQ吓傻（HansBug：直到后来看到才两行= =，而且第二行还全空 phile：呵呵哒，那岂不是秒杀 HansBug：求不鄙视TT） ，在仔细想想，那岂不是只要确定了前两个的值，那么后面的全都至多有一种摆放方式了么？？？（惊呼——），所以我就呵呵赖（论1<=N<=10000这个条件究竟是为了吓唬我等蒟蒻还是用来障眼的呢？嗯哼^_X）

 1 var
 2    i,j,k,l,m,n:longint;
 3    a,b,c:array[..] of longint;
 4 function doit(x:longint):boolean;
 5          begin
 6               if x>n then
 7                  begin
 8                       if (a[x-]-b[x-]-b[x-])= then exit(true) else exit(false);
 9                  end;
               if ((a[x-]-b[x-]-b[x-])>=) and ((a[x-]-b[x-]-b[x-])<=) then
                  begin
                       b[x]:=a[x-]-b[x-]-b[x-];
                       exit(doit(x+));
                  end;
               exit(false);
          end;
 begin
      readln(n);
      for i:= to n do
          read(a[i]);
      readln;k:=;
      for i:= to  do
          for j:= to  do
              begin
                   b[]:=i;b[]:=j;
                   if (b[]+b[])=a[] then
                      begin
                           if doit() then inc(k);
                      end;
              end;
      writeln(k);

32 end.