单调队列优化DP，调了一节课。。。设f[i]为“不选取第i头奶牛时，前i-1头奶牛所能获得的最大效率”，sum[i,j]为第i头到第j头奶牛的效率之和（包括端点）
则 f[i]=max{f[i-j]+sum[i-j+1,i-1],(i-1)-(i-j+1)<=k},这玩意就可以单调队列求了。
sum[i,j]用前缀和求。数据类型unsigned long long 比较保险。

膜拜学弟.....

就我一个闲的蛋疼离散了一下吗？
树状数组竟然写跪了 我会说吗？

STL造福人类啊！

我去，还要构造等比数列！

膜拜学弟....

回复 @安呐。 :
调试了一晚上+一上午......

这不科学。。。第三个测试点明明有字典序更小的方法

回复 @Satoshi :
程序的fuck();函数引人注目

正好1200 ·-·

HZOI!

枚举一个轴，三分另一个轴，真TMD难写
图是我自己加的
这不是一道计算几何题，这不是一道计算几何题，这不是一道计算几何题，注意细节，注意细节，注意细节，重要的事情说三遍
需要写数据结构维护四个区域的点，最好是二叉排序树或者其他平衡树，树状数组维护逆序对也是可以的
官方是枚举+二分+线段树，我是枚举+三分

回复 @洛克索耶夫 :
赶上精分现场

我真傻，真的。

被包围了还这么闲情雅致。。。

貌似数据无误或已修复(...).

表示太难过最后一个T，自己怎么也过不去.
求提速
var
x,y,f,maxy,z,n,i,j:longint;
a:array[1..1000000]of integer;
begin
assign(input,'tickets.in');
assign(output,'tickets.out');
reset(input);
rewrite(output);
readln(n,f);
for i:=1 to n do
read(a[i]);
for i:=1 to n do
begin
z:=f;
for j:=i to n do
begin
z:=z-a[j];
if z>=0 then y:=y+1
else
begin
if(maxy<y)then maxy:=y;
y:=0;
break;
end;
end;
end;
write(maxy);
close(input);
close(output);
end.

[size=36]居然上榜啦！[/size]

这题什么鬼啊

模拟水之