取數字問題

2021-07-27 20:05:38 字數 1644 閱讀 5330

取數字問題

time limit:10000ms  memory limit:65536k

total submit:308 accepted:104 

case time limit:1000ms

description

給定m*n的矩陣,其中的每個元素都是-10到10之間的整數。你的任務是從左上角(1,1)走到右下角(m,n),每一步只能向右或向下,並且不能走出矩陣的範圍。你所經過的方格裡面的數字都必須被選取,請找出一條最合適的道路,使得在路上被選取的數字之和是盡可能小的正整數。

input

第一行兩個整數m,n,(2<=m,n<=10),分別表示矩陣的行和列的數目。 

接下來的m行,每行包括n個整數,就是矩陣中的每一行的n個元素。 

output

僅一行乙個整數,表示所選道路上數字之和所能達到的最小的正整數。如果不能達到任何正整數就輸出-1。 

sample input

2 2

0 21 0

sample output

1

source

elba

公式:

f[i,j,k]:=true;

var   m,n,i,j,k,bz:longint;

a:array[-10..101,-10..101]of longint;

f:array[-10..101,-10..101,-1000..1000]of boolean;

begin

readln(n,m);

for i:=1 to n do

begin

for j:=1 to m do

read(a[i,j]);

end;

fillchar(f,sizeof(f),false);

f[1,1,a[1,1]]:=true;

for i:=2 to m do

for k:=-1000 to 1000 do

if f[1,i-1,k] then f[1,i,k+a[1,i]]:=true;

for i:=2 to n do

for k:=-1000 to 1000 do

if f[i-1,1,k] then f[i,1,k+a[i,1]]:=true;

for i:=2 to n do

begin

for j:=2 to m do

begin

for k:=-1000 to 1000 do

if f[i,j-1,k] then f[i,j,k+a[i,j]]:=true;

for k:=-1000 to 1000 do

if f[i-1,j,k] then f[i,j,k+a[i,j]]:=true;

end;

end;

i:=1;

while (f[n,m,i]=false)and(i<=1000) do inc(i);

if i>1000 then write(-1) else write(i);

end.

取數字問題

給定m n的矩陣,其中的每個元素都是 10到10之間的整數。你的任務是從左上角 1,1 走到右下角 m,n 每一步只能夠向右或者向下,並且不能夠走出矩陣的範圍。你所經過的方格裡面的數字都必須被選取,請找出一條最合適的道路,使得在路上被選取的數字之和是盡可能小的正整數。輸入第1行是兩個整數m和n,2 ...

取數字問題

think 因為只能往2個方向走,所以只需遍歷每個方向,然後對其進行判斷。特別要注意sum 0的情況 因為題目規定 和正整數,所以當sum 0時flag依舊為false。最後根據flag的狀態來控制輸出。problem description 給定m n的矩陣,其中的每個元素都是 10到10之間的整...

取數字問題

time limit 1000ms memory limit 65536kb submit statistic problem description 給定m n的矩陣,其中的每個元素都是 10到10之間的整數。你的任務是從左上角 1,1 走到右下角 m,n 每一步只能夠向右或者向下,並且不能夠走出...