BZOJ1652 [Usaco2006 Feb]Treats for the Cows
生活随笔
收集整理的這篇文章主要介紹了
BZOJ1652 [Usaco2006 Feb]Treats for the Cows
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
蒟蒻許久沒做題了,然后連動規方程都寫不出了。
參照iwtwiioi大神,這樣表示區間貌似更方便。
令f[i, j]表示i到j還沒賣出去,則
f[i, j] = max(f[i + 1, j] + v[i] * T, f[i, j -?1] + v[j] * T) (←這樣用推的方式更好想一點。。)
?
1 /************************************************************** 2 Problem: 1652 3 User: rausen 4 Language: Pascal 5 Result: Accepted 6 Time:136 ms 7 Memory:24852 kb 8 ****************************************************************/ 9 10 uses math; 11 12 var 13 n, k, i, j, t : longint; 14 f : array[0..2500, 0..2500] of longint; 15 v : array[0..2500] of longint; 16 17 begin 18 readln(n); 19 for i := 1 to n do 20 read(v[i]); 21 for k := 1 to n do begin 22 t := n - k + 1; 23 for i := 1 to t do begin 24 j := i + k - 1; 25 f[i, j] := max(f[i + 1, j] + t * v[i], f[i, j - 1] + t * v[j]); 26 end; 27 end; 28 writeln(f[1, n]); 29 end. View Code?
轉載于:https://www.cnblogs.com/rausen/p/4023213.html
總結
以上是生活随笔為你收集整理的BZOJ1652 [Usaco2006 Feb]Treats for the Cows的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: Service详解
- 下一篇: 一个对象,数组去重的方法