歷年完善程序題提高組noip2002

1、四完善程序：（15 + 15 = 30 分）1 問(wèn)題描述：工廠在每天的生產(chǎn)中，需要一定數(shù)量的零件，同時(shí)也可以知道每天生產(chǎn)一個(gè)零件的生產(chǎn)單價(jià)。在 N 天的生產(chǎn)中，當(dāng)天生產(chǎn)的零件可以滿足當(dāng)天的需要，若當(dāng)天用不完，可以放到下一天去使用，但要收取每個(gè)零件的保管費(fèi)，不同的天收取的費(fèi)用也不相同。問(wèn)題求解：求得一個(gè) N 天的生產(chǎn)計(jì)劃（即 N 天中每天應(yīng)生產(chǎn)零件個(gè)數(shù)），使總的費(fèi)用最少。輸入：N（天數(shù) N=29）每天的需求量（N 個(gè)整數(shù)）每天生產(chǎn)零件的單價(jià)（N 個(gè)整數(shù)）每天保管零件的單價(jià)（N 個(gè)整數(shù)）輸出：每天的生產(chǎn)零件個(gè)數(shù)（N 個(gè)整數(shù)）例如：當(dāng) N=3 時(shí)，其需要量與費(fèi)用如下：生產(chǎn)計(jì)劃的安排可以有許多方案，如

2、下面的三種：程序說(shuō)明： bn：存放每天的需求量 cn：每天生產(chǎn)零件的單價(jià) dn：每天保管零件的單價(jià) en：生產(chǎn)計(jì)劃程序：program exp5; vari,j,n,yu,j0,j1,s :eger ;b,c,d,e : array0.30 ofeger ;beginreadln(n);for i:=1 to n do readln(bi,ci,di); for i:=1 to n do ei:=0;:=10000;cn+2=0;while (j0=n) do beginyu:=cj0;j1:=j0;s:=bj0; while do begin j1:=j1+1;end;bn+1:=0j0:=

3、1;s:=s+bj1;第一天第二天第三天總的費(fèi)用25153025*20+15*30+30*32=*20+15*5+30*32=1835700070*20+45*5+30*10=1925第一天第二天第三天需 要 量25生產(chǎn)單價(jià)保管單價(jià)100 j0:=j1+1;end;for i:=1 to n do readln;end.二問(wèn)題描述：有n 種基本物質(zhì)（n10），分別記為 P1，P2，Pn，用 n 種基本物質(zhì)構(gòu)造物質(zhì)，這些物品使用在 k 個(gè)不同地區(qū)（k20），每個(gè)地區(qū)對(duì)物品提出自己的要求，這些要求用一個(gè) n 位的數(shù)表示：a1a2a n，其中：ai = 1 表示所需物質(zhì)中必須有第 i 種基本物質(zhì)=

4、-1 表示所需物質(zhì)中必須不能有第 i 種基本物質(zhì)= 0 無(wú)所謂問(wèn)題求解：當(dāng)k 個(gè)不同要求給出之后，給出不被使用。案，哪些物質(zhì)被使用，哪些物質(zhì)程序說(shuō)明：數(shù)組 b1,b2bna1.k,1.nai,j=1ai,j=0ai,j= -1程序：表示某種物質(zhì)k 個(gè)地區(qū)對(duì)物品的要求，其中：表示第 i 個(gè)地區(qū)對(duì)第 j 種物品是需要的表示第 i 個(gè)地區(qū)對(duì)第 j 種物品是無(wú)所謂的表示第 i 個(gè)地區(qū)對(duì)第 j 種物品是不需要的program gxp2; vari,j,k,n :p:eger ;b: array0.20 of 0.1 ;a: array1.20,1.10 of beginreadln(n,k);for i:=1 to k do begineger ;for j:=1 to n do read(ai,j);readln;end;for i:=0 to n do bi:=0; p:=true;while dobeginj:=n;whij=1 do j:=j-1;for i:=j+1 to n do bi:=0;for i:=1 to k dofor j:=1 to n doif (ai,j=1) and (bj=0) or then p:=true;end;if then wrin(找