from
silence☆滑雪
背景 background
成成第一次模擬賽 第三道
描述 description
輸入格式 input format
輸入檔案
第1行: 兩個數字r,c(1<=r,c<=100),表示矩陣的行列。
第2..r+1行:每行c個數,表示這個矩陣。
輸出格式 output format
輸出檔案
僅一行: 輸出1個整數,表示可以滑行的最大長度。
樣例輸入 sample input [複製資料]
樣例輸出 sample output [複製資料]
時間限制 time limitation
各個測試點1s
const d:array[1..4,1..2] of longint=((1,0),(0,1),(-1,0),(0,-1));
var f,a:array[0..100,0..100] of longint;
n,m,i,j,k,sum:longint;
function max(x,y:longint):longint;
begin
if x>y then exit(x);
exit(y);
end;
function find(x,y:longint):longint;
var i,j,k,dx,dy:longint;
begin
if f[x,y]<>0 then exit(f[x,y]);
for i:=1 to 4 do
begin
dx:=x+d[i,1]; dy:=y+d[i,2];
if (dx>0) and (dx<=n) and (dy>0) and (dy<=m) then
if a[dx,dy]sum then sum:=k;
end;
writeln(sum+1);
close(input); close(output);
end.
記憶化搜尋 滑雪
題目描述 michael喜歡滑雪這並不奇怪,因為滑雪的確很刺激。可是為了獲得速度,滑的區域必須向下傾斜,而且當你滑到坡底,你不得不再次走上坡或者等待公升降機來載你。michael想知道載乙個區域中最長底滑坡。區域由乙個二維陣列給出。陣列的每個數字代表點的高度。下面是乙個例子 1 2 3 4 5 16...
滑雪 記憶化搜尋
trs喜歡滑雪。他來到了乙個滑雪場,這個滑雪場是乙個矩形,為了簡便,我們用r行c列的矩陣來表示每塊地形。為了得到更快的速度,滑行的路線必須向下傾斜。例如樣例中的那個矩形,可以從某個點滑向上下左右四個相鄰的點之一。例如24 17 16 1,其實25 24 23 3 2 1更長,事實上這是最長的一條。輸...
滑雪(記憶化搜尋)
michael喜歡滑雪百這並不奇怪,因為滑雪的確很刺激。可是為了獲得速度,滑的區域必須向下傾斜,而且當你滑到坡底,你不得不再次走上坡或者等待公升降機來載你。michael想知道載乙個區域中最長底滑坡。區域由乙個二維陣列給出。陣列的每個數字代表點的高度。下面是乙個例子 1 2 3 4 5 16 17 ...