SSL JudgeOnline 2277——最少转弯问题

Description

给出一张地图，这张地图被分为n×m（n,m<=100）个方块，任何一个方块不是平地就是高山。平地可以通过，高山则不能。现在你处在地图的（x1,y1）这块平地，问：你至少需要拐几个弯才能到达目的地（x2,y2）？你只能沿着水平和垂直方向的平地上行进，拐弯次数就等于行进方向的改变（从水平到垂直或从垂直到水平）的次数。例如：如图1，最少的拐弯次数为5。

Input

第1 行：n m
第2 至n+1行：整个地图地形描述（0：空地；1：高山），
如（图1）
第2 行地形描述为：1 0 0 0 0 1 0
第3 行地形描述为：0 0 1 0 1 0 0
……
第n+2 行：x1 y1 x2 y2 （分别为起点、终点坐标）

Output

s （即最少的拐弯次数）

Sample Input

5 7
1 0 0 0 0 1 0
0 0 1 0 1 0 0
0 0 0 0 1 0 1
0 1 1 0 0 0 0
0 0 0 0 1 1 0
1 3 1 7

Sample Output

5

---

这题用bfs

我们设state:array[1..100,1..3]//1为横坐标 2为纵坐标 3为转弯的次数
我们判断这个点有没有被走过，然后我们向四个方向搜//x+dx[i] y+dy[i]
每一次搜到有高山阻挡，在每一次的搜索中我们还要判断是否已到达终点（x=x1 y=y2)，到达就输出state[t,3]

---

代码如下：

const dx:array[1..4] of -1..1 = (1,-1,0,0);
      dy:array[1..4] of -1..1 = (0,0,1,-1);

var a:array[0..101,0..101] of longint;
    t:array[0..10001,1..3] of longint;
    f:array[0..101,0..101] of boolean;
    m,n,x,y,i,j,head,tail,x1,x2,y1,y2:longint;


procedure bfs(x1,y1:longint);
var i,j:longint;
begin
  head:=0;
  tail:=1;
  f[x1,y1]:=false;
  t[1,1]:=x1;         
  t[1,2]:=y1;        
  t[1,3]:=0;         
  repeat
    inc(head);
    for i:=1 to 4 do
    begin
       x:=t[head,1]+dx[i];
       y:=t[head,2]+dy[i];
       if f[x,y] then
          while a[x,y] = 0 do
              begin
                inc(tail);
                t[tail,1]:=x;
                t[tail,2]:=y;
                t[tail,3]:=t[head,3]+1; 
                f[x,y]:=false;          
                if (x=x2) and (y=y2) then
                  begin writeln(t[tail,3]-1);halt;end;
                x:=x+dx[i];
                y:=y+dy[i];
              end;
    end;
  until head>tail;
end;

begin
  fillchar(f,sizeof(f),true);
  readln(n,m);
  for i:=1 to n do
    for j:=1 to m do
      read(a[i,j]);
  for i:=1 to m do
    begin
      a[0,i]:=1;
      a[n+1,i]:=1;
    end;
  for i:=1 to n do
    begin
      a[i,0]:=1;
      a[i,m+1]:=1;
    end;
  readln(x1,y1,x2,y2);
  bfs(x1,y1);
end.

转载于:https://www.cnblogs.com/Comfortable/p/8412451.html