洛谷 P1189 SEARCH
题目
题目描述
年轻的拉尔夫开玩笑地从一个小镇上偷走了一辆车,但他没想到的是那辆车属于警察局,并且车上装有用于发射车子移动路线的装置。
那个装置太旧了,以至于只能发射关于那辆车的移动路线的方向信息。
编写程序,通过使用一张小镇的地图帮助警察局找到那辆车。程序必须能表示出该车最终所有可能的位置。
小镇的地图是矩形的,上面的符号用来标明哪儿可以行车哪儿不行。“.”表示小镇上那块地方是可以行车的,而符号“X”表示此处不能行车。拉尔夫所开小车的初始位置用字符的“*”表示,且汽车能从初始位置通过。
汽车能向四个方向移动:向北(向上),向南(向下),向西(向左),向东(向右)。
拉尔夫所开小车的行动路线是通过一组给定的方向来描述的。在每个给定的方向,拉尔夫驾驶小车通过小镇上一个或更多的可行车地点。
输入输出格式
输入格式:
输入文件的第一行包含两个用空格隔开的自然数R和C,1≤R≤50,1≤C≤50,分别表示小镇地图中的行数和列数。
以下的R行中每行都包含一组C个符号(“.”或“X”或“*”)用来描述地图上相应的部位。
接下来的第R+2行包含一个自然数N,1≤N≤1000,表示一组方向的长度。
接下来的N行幅行包含下述单词中的任一个:NORTH(北)、SOUTH(南)、WEST(西)和EAST(东),表示汽车移动的方向,任何两个连续的方向都不相同。
输出格式:
输出文件应包含用R行表示的小镇的地图(象输入文件中一样),字符“*”应该仅用来表示汽车最终可能出现的位置。
输入输出样例
输入样例#1:
4 5
…..
.X…
…*X
X.X..
3
NORTH
WEST
SOUTH
输出样例#1:
…..
X..
..X
X.X..
题解
模拟,用数组保存当前可能的位置,再枚举该方向上可能到达的位置,直到出边界或者遇到障碍物为止,并在过程中把可能到达的点标记为下一个状态的可能的位置
代码(Pascal)
var n,m,i,j,k,x,y,e:longint;
a,b:array['A'..'Z'] of longint;
f,f1:array[-1..102,-1..102] of boolean;
s:array[-1..102] of string;
t:char;
begin
readln(n,m);
for i:=1 to n do
begin
readln(s[i]);
if pos('*',s[i])>0 then f[i,pos('*',s[i])]:=true;
end;
readln(e);
a['N']:=-1;a['S']:=1;
b['W']:=-1;b['E']:=1;
for i:=1 to e do
begin
readln(t);
fillchar(f1,sizeof(f1),false);
for j:=1 to n do
for k:=1 to m do
if f[j,k] then
begin
x:=j+a[t];
y:=k+b[t];
while (s[x,y]<>'X')and(x>=1)and(x<=n)and(y>=1)and(y<=m) do
begin
f1[x,y]:=true;
x:=x+a[t];
y:=y+b[t];
end;
end;
f:=f1;
end;
for i:=1 to n do
begin
for j:=1 to m do
if s[i,j]='X' then write('X')
else if f[i,j] then write('*')
else write('.');
writeln;
end;
end.