翱翔的感觉

摘要： 样例和网上找的测试数据 都过了 还是 waprogram poj3009;type sta=record x,y:integer; end;var dir:array[1..4,1..2]of integer=((1,0),(-1,0),(0,1),(0,-1)); w,h,ans,ansb:integer; map:array[0..21,0..21]of integer; start:sta; flag:boolean;procedure dfs(x,y,d,depth:integer);var i,tx,ty,j:integer;begin if depth>10 then exi 阅读全文