洛谷1443 马的遍历 解题报告

本文介绍了一种解决洛谷1443马的遍历问题的方法,通过广度优先搜索(BFS)算法计算在一个n*m的棋盘上,马从指定位置出发到达每个点所需的最少步数。

洛谷1443 马的遍历

本题地址: http://www.luogu.org/problem/show?pid=1443

题目描述

有一个n*m的棋盘(1<n,m<=200),在某个点上有一个马,要求你计算出马到达棋盘上任意一个点最少要走几步

输入输出格式

输入格式:

一行四个数据,棋盘的大小和马的坐标

输出格式:

一个n*m的矩阵,代表马到达某个点最少要走几步(左对齐,宽5格,不能到达则输出-1)

输入输出样例

输入样例#1:

3 3 1 1

输出样例#1:

0    3    2    
3    -1   1    
2    1    4    

题解

广搜BFS

这道题目选择广搜思路会更清晰一些。

我们都知道马的走法(马走日)。

首先,将所有点赋值为-1,如果马没有经过某个点,那么它的值还是保持-1不变。

从起点开始,把当前点移除队列,再从当前点向外扩展一层,将新节点加入队列。同时,用计数器记录步数,赋值给新节点。

当走到终点后,将所有点的值输出即可。

下面附上代码。

代码

  1. const      
  2.   dx:array[1..8] of longint=(2,2,-2,-2,1,1,-1,-1);      
  3.   dy:array[1..8] of longint=(1,-1,-1,1,2,-2,2,-2);      
  4. var       
  5.   k,n,m,x,y,i,j,xx,yy,head,tail:longint;      
  6.   q:array[1..2000000,1..2] of longint;      
  7.   a:array[-2..200,-2..200] of longint;      
  8.   dist:array[-10..210,-10..210] of int64;      
  9. begin      
  10.   read(n,m,x,y);      
  11.   fillchar(dist,sizeof(dist),-1);      
  12.     q[1,1]:=x; q[1,2]:=y; head:=0; tail:=1; dist[x,y]:=0;      
  13.   while head<tail do      
  14.     begin      
  15.       inc(head);       
  16.       x:=q[head,1]; y:=q[head,2];      
  17.       for i:=to do      
  18.         begin      
  19.           xx:=x+dx[i]; yy:=y+dy[i];      
  20.           if (dist[xx,yy]=-1) and (xx>0) and (xx<=n) and (yy>0) and(yy<=m) then      
  21.             begin      
  22.               inc(tail);      
  23.               q[tail,1]:=xx; q[tail,2]:=yy;      
  24.               dist[xx,yy]:=dist[x,y]+1;      
  25.             end;      
  26.         end;      
  27.     end;      
  28.   for i:=to n do      
  29.     begin      
  30.     for j:=to m do      
  31.       begin      
  32.         write(dist[i,j]);      
  33.         if dist[i,j]=-then for k:=to do write(' ')     
  34.         else if dist[i,j] div 10=then for k:=to do write(' ')     
  35.         else if dist[i,j] div 100=then for k:=to do write (' ')      
  36.         else if dist[i,j] div 1000=then for k:=to do write(' ')      
  37.         else if dist[i,j] div 10000=then write(' ');      
  38.       end;      
  39.       writeln;      
  40.     end;      
  41. end.  

(本文系笔者原创,未经允许不得转载)

转载于:https://www.cnblogs.com/yzm10/p/4751989.html

问题描述:将随机放在国际象棋的 8X8 棋盘中的某个方中,按走棋规则进行移动。要求每个方上只进入一次,走遍棋盘上全部 64 个方。编制递归程序,求出的行走路线 ,并按求出的行走路线,将数字 1,2,…,64 依次填入 8X8 的方阵输出之。测试数据:由读者指定可自行指定一个的初始位置。实现提示:每次在多个可走位置中选择一个进行试探,其余未曾试探过的可走位置必须用适当结构妥善管理,以备试探失败时的“回溯”悔棋使用。并探讨每次选择位置的“最佳策略”,以减少回溯的次数。 背景介绍: 国际象棋为许多令人着迷的娱乐提供了固定的框架,而这些框架常独立于游戏本身。其中的许多框架都基于骑士奇异的L型移动规则。一个经典的子是骑士漫游问题。从十八世纪初开始,这个问题就引起了数学家和解密爱好者的注意。简单地说,这个问题要求从棋盘上任一个方开始按规则移动骑士,使之成功的游历国际象棋棋盘的64个方,且每个方都接触且仅接触一次。 可以用一种简便的方法表示问题的一个解,即将数字1,……,64按骑士到达的顺序依次放入棋盘的方中。 一种非常巧妙的解决骑士漫游地方法由J.C.Warnsdorff于1823年给出。他给出的规则是:骑士总是移向那些具有最少出口数且尚未到达的方之一。其中出口数是指通向尚未到达方的出口数量。在进一步的阅读之前,你可以尝试利用Warnsdorff规则手工构造出该问题的一个解。 实习任务: 编写一个程序来获得踏棋盘即骑士漫游问题的一个解。 您的程序需要达到下面的要求: 棋盘的规模是8*8; 对于任意给定的初始化位置进行试验,得到漫游问题的解; 对每次实验,按照棋盘矩阵的方式,打印每个被行径的顺序编号。 技术提示: 解决这类问题的关键是考虑数据在计算机中的存储表示。可能最自然的表示方法就是把棋盘存储在一个8*8的二维数组board中。以(x,y)为起点时骑士可能进行的八种移动。一般来说,位于(x,y)的骑士可能移动到以下方之一:(x-2,y+1)(x-1,y+2)(x+1,y+2)(x+2,y+1)(x+2,y-1)(x+1,y-2)(x-1,y-2)(x-2,y-1)。但请注意,如果(x,y)的位置离某一条边较近,有些可能的移动就会把骑士移到棋盘之外,而这当然是不允许的。骑士的八种可能的移动可以用一个数组MoveOffset方便地表示出来: MoveOffset[0]=(-2,1) MoveOffset[1]=(-1,2) MoveOffset[2]=(1,2) MoveOffset[3]=(2,1) MoveOffset[4]=(2,-1) MoveOffset[5]=(1,-2) MoveOffset[6]=(-1,-2) MoveOffset[7]=(-2,-1) 于是,位于(x,y)的骑士可以移动到(x+MoveOffset[k].x, y+MoveOffset[k].y),其中k是0到7之间的某个整数值,并且新方必须仍位于棋盘上。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值