[Usaco 2011 Dec]Umbrellas for Cows

题面：

今天是下雨天！FJ的N （ 1 < = N < = 5,000）头奶牛不喜欢被淋湿。它们站在数轴上（1到M （ 1 < = M < = 100,000 ）），现在FJ要买伞，遮住i个点的伞要Ci元，问给所有的牛遮雨要花多少钱？ 

只能说这题比较坑了，跟[USACO 2012 Dec]Wifi Setup比较像，好像此题比那题先出。。

坑在哪里呢。就是比方说遮住10个点的伞可能比遮住9个点的伞要便宜（不知道是不是盗版），所以就不能直接按距离做，这里我做了一个处理，就是如果小的伞要比大的伞贵，就把小的伞的价格变成大的伞的价格，这样就可以直接按照距离做了，可以保证答案的最优性。

     先将奶牛的位置排序。直接给出转移方程：

     F[I]:=MIN(F[J],COST[A[I]-A[J+1]+1]) (J

     时间复杂度O(N^2)。

var
  n,m,i,j,k:longint;
  cost:array[0..100000] of longint;
  f,a:array[0..5000] of longint;

  function min(a,b:longint):longint;
  begin if am do dec(j);
      if i<=j then
      begin
       t:=a[i]; a[i]:=a[j]; a[j]:=t;
       inc(i); dec(j);
      end;
    until i>j;
    if lcost[i+1] then
     cost[i]:=cost[i+1];
  for i:=1 to n do
   f[i]:=cost[a[i]-a[1]+1];
  for i:=2 to n do
   for j:=1 to i-1 do
   f[i]:=min(f[i],f[j]+cost[a[i]-a[j+1]+1]);
  writeln(f[n]);
end.