在乙個暴風雨的夜晚,農民約翰的牛棚的屋頂、 門被吹飛了. 好在許多牛正在度假,所以牛棚沒有住
滿. 剩下的牛乙個緊挨著另乙個被排成一行來過夜. 有些牛棚裡有牛,有些沒有. 所有的牛棚有相
同的寬度. 自門遺失以後,農民約翰很快在牛棚之前豎立起新的木板. 他的新木材**者將會**
他任何他想要的長度,但是**者只能提供有限數目的木板. 農民約翰想將他購買的木板總長度減
到最少. 給出 m(1<= m<=50),可能買到的木板最大的數目;s(1<= s<=200),牛棚的總數;c(1 <= c
<=s) 牛棚裡牛的數目,和牛所在的牛棚的編號 stall_number(1 <= stall_number <= s),計算攔住
所有有牛的牛棚所需木板的最小總長度. 輸出所需木板的最小總長度作為的答案.
program name: barn1
input format
第 1 行: m , s 和 c(用空格分開)
第 2 到 c+1 行: 每行包含乙個整數,表示牛所佔的牛棚的編號.
sample input (file barn1.in)
4 50 18
3 4
6 8
14 15
16 17
21 25
26 27
30 31
40 41
42 43
output format
單獨的一行包含乙個整數表示所需木板的最小總長度.
sample output (file barn1.out)
25
******************************====
注意：對於一般性的需要利用順序的題目，一定要在程式中先排序...
不要相信出題人會把順序給你排好，讓你做....這些細節千萬不要出錯...
***************==
var m,s,c:longint;
np,np_:array[1..200]of longint;
procedure init;
begin
assign(input,'barn1.in');
assign(output,'barn1.out');
reset(input); rewrite(output);
end;
procedure terminate;
begin
close(input); close(output);
halt;
end;
procedure main;
var i,j,n,tem,t:longint;
// n:longint;
begin
readln(m,s,c);
for i:=1 to c do
readln(np[i]);
for i:=1 to c-1 do
for j:=i+1 to c do
if np[i]>np[j] then
begin
tem:=np[i];
np[i]:=np[j];
np[j]:=tem;
end;
n:=1; //所用木塊個數...
s:=np[c]-np[1]+1; //所用木塊總長度...
for i:=2 to c do
begin
np_[i]:=np[i]-np[i-1]-1; //i與i+1的間隔長度...
//if np_[i]=0 then dec(n);
end;
for i:=1 to c-1 do
for j:=i+1 to c do
if np_[i]
修理牛棚 Barn Repair
題目描述 在乙個夜黑風高,下著暴風雨的夜晚,farmer john的牛棚的屋頂 門被吹飛了。好在許多牛正在度假，所以牛棚沒有住滿。牛棚乙個緊挨著另乙個被排成一行，牛就住在裡面過夜。有些牛棚裡有牛，有些沒有。所有的牛棚有相同的寬度。自門遺失以後,farmer john必須盡快在牛棚之前豎立起新的木板。...
（usaco）修理牛棚 Barn Repair
題目傳送門sxazr 本題可以這樣想我這蒟蒻沒想出 一條超長木板把所有牛棚覆蓋，然後從中截去m 1段，就剩下m段了 這樣就可以簡單的貪心了 把每個有牛的牛棚之間的距離從大到小排序 截去最大的m 1個就好了。include include include using namespace std int...
1 3 2 Barn Repair 修理牛棚
在乙個夜黑風高,下著暴風雨的夜晚,農民約翰的牛棚的屋頂 門被吹飛了。好在許多牛正在度假，所以牛棚沒有住滿。剩下的牛乙個緊挨著另乙個被排成一行來過夜。有些牛棚裡有牛，有些沒有。所有的牛棚有相同的寬度。自門遺失以後,農民約翰必須盡快在牛棚之前豎立起新的木板。他的新木材 商將會 他任何他想要的長度,但是 ...