題目描述 有一個(gè)箱子容量為V（正整數(shù)，0＜＝V＜＝20000），同時(shí)有n個(gè)物品（0＜n＜＝30，每個(gè)物品有一個(gè)體積（正整數(shù)）。 要求n個(gè)物品中，任取若干個(gè)裝入箱內(nèi)，使箱子的剩余空間為最小。
輸入輸出格式 輸入格式： 一個(gè)整數(shù)，表示箱子容量 一個(gè)整數(shù)，表示有n個(gè)物品 接下來n行，分別表示這n 個(gè)物品的各自體積 輸出格式： 一個(gè)整數(shù)，表示箱子剩余空間。
輸入輸出樣例 輸入樣例#1： 24 6 8 3 12 7 9 7 輸出樣例#1： 0
程序如下：
var n,m,max,k,l:longint; a:array[1..30] of longint;PRocedure init;var i:longint;begin readln(n); readln(m); for i:=1 to m do readln(a[i]);end;procedure main(k,l:longint);begin if (k>m)or(l>=n) then begin if (l<=n)and(max>n-l) then max:=n-l; exit; end; main(k+1,l+a[k]); main(k+1,l);end;begin init; max:=maxlongint; main(1,0); write(max);end.新聞熱點(diǎn)
疑難解答
圖片精選
網(wǎng)友關(guān)注
