当前位置:首页 >> 学科竞赛 >>

holstein


【题目描述】

Healthy Holsteins
Burch & Kolstad Farmer John prides himself on having the healthiest dairy(乳品的) cows in the world. He knows the vitamin(维生素) content for one scoop(

勺) of each feed type and the minimum(最小的) daily vitamin requirement for the cows. Help Farmer John feed his cows so they stay healthy while minimizing(使减到最少) the number of scoops that a cow is fed. Given the daily requirements of each kind of vitamin that a cow needs, identify(确定) the smallest combination(结合) of scoops of feed a cow can be fed in order to meet at least the minimum vitamin requirements. Vitamins are measured in integer(整数) units. Cows can be fed at most one scoop of any feed type. It is guaranteed(保证) that a solution(解决方案) exists for all contest(竞赛) input(投入) data. 【我的思路】 DFS 把所有的情况枚举一遍,按照组合数的搜索方法。 【code】 { ID:yxy07015 PROG:holstein LANG:PASCAL } var n,m,i,j,v,min:integer; a:array[1..25] of integer; b,minb:array[0..15] of integer; map:array[1..15,1..25] of integer; function check:boolean; begin for v:=1 to n do if a[v]>0 then exit(false); exit(true); end; procedure dfs(k:integer); var i:integer; begin if check then begin if k-1<min then begin min:=k-1; minb:=b; end; end else for i:=b[k-1]+1 to m do begin

b[k]:=i; for j:=1 to n do dec(a[j],map[i,j]); dfs(k+1); b[k]:=0; for j:=1 to n do inc(a[j],map[i,j]); end; end; begin assign(input,'holstein.in'); reset(input); assign(output,'holstein.out'); rewrite(output); readln(n); for i:=1 to n do read(a[i]); readln(m); for i:=1 to m do for j:=1 to n do read(map[i,j]); min:=$7f; b[0]:=0; dfs(1); write(min,' '); for v:=1 to min-1 do write(minb[v],' '); writeln(minb[min]); close(input); close(output); end. Executing... Test 1: TEST OK [0.003 secs, 276 KB] Test 2: TEST OK [0.003 secs, 276 KB] Test 3: TEST OK [0.000 secs, 276 KB] Test 4: TEST OK [0.003 secs, 276 KB] Test 5: TEST OK [0.000 secs, 276 KB] Test 6: TEST OK [0.003 secs, 276 KB] Test 7: TEST OK [0.003 secs, 276 KB] Test 8: TEST OK [0.005 secs, 276 KB] Test 9: TEST OK [0.011 secs, 276 KB] Test 10: TEST OK [0.030 secs, 276 KB] All tests OK.


相关文章:
特殊名称骨折及骨科评分--汇总速记
Holstein—Lewis 骨折】肱骨远端 1/3 骨折伴桡神经嵌压。 【Posadas 骨折】经髁的肱骨骨折,伴有骨折碎块向前移位,以及因双髁骨折造成尺桡骨的 脱位。【Kocher ...
英语 百度百科
次入侵是在公元五世纪中叶,当时生活在现在的德国和丹麦交界处 有两个部落:一个是石勒苏益格(Schleswig)的盎格鲁(Angles),另一个是霍尔 施坦因(Holstein)的萨克森...
不同台次奶牛乳制品的回归分析
关键词: 荷斯坦奶牛 胎次 乳品质 回归分析 Abstract DHI information of 521 different parity Holstein dairy cow in Pinjipu dairy breeding farm once a month...
牛生产学
1. 荷斯坦牛(Holstein) 荷斯坦牛原称荷兰牛,已经有 2000 多年的育种历史, 毛色为黑白花或红白花。黑白花牛原产于荷兰滨海地区的北 北 荷兰和西弗里生 ...
德语历史特点
(Nordrhein-Westfalen)、下萨克森州(Nidersachsen)、石勒 苏益格 - 荷尔施泰因州 (Schleswig-Holstein) 绝大多数城市、以及荷兰东南部 (Suedostniederlande)很多省的...
关于英美的地名
Angle 的原义是"钩子",因为这个民族是从德国西北部 Schleswig-Holstein 地方一块钩形半岛(德文 Angeln)到不列颠来的。这名称可能是先被外人(如罗马人)叫起来的,...
关于英美的地名
Angle 的原义是"钩子",因为这个民族是从德国西北部 Schleswig-Holstein 地方一块钩形半岛(德文 Angeln)到不列颠来的。这名称可能是先被外人(如罗马人)叫起来的,...
关于英美的地名
Angle 的原义是"钩子",因为这个民族是从德国西北部 Schleswig-Holstein 地方一块钩形半岛(德文 Angeln)到不列颠来的。这名称可能是先被外人(如罗马人)叫起来的,...
华西里娅教授简历
作为卡尔?海恩茨?凯沫林教授的助教,二十年如一日,与凯沫林教授共同在奥地利萨尔兹堡莫扎特国立音 乐学院、斯雷维格-赫尔斯坦国际音乐节(Schleswig-Holstein Musik ...
江苏某奶牛场荷斯坦牛泌乳初期乳成分分析
[Method] The milk yield and component content of Holstein dairy cows in a dairy farm of Jiangsu Province were determined, and the correlations between ...
更多相关标签: