一直找不到好的题去做...于是想到了srm...回来补题...QAQ
从srm01补起
A
题意：n个数，排成一列，刚开始都是1，如果左右相等就可以合并，问最后的数列长什么样。
思路：比赛的时候直接敲了个 一直log2 直到为0，觉得应该是100的...于是炸到了90.
比完赛懒得调就没去理，回来补的时候发现是p的trunc有点问题哇...以后都打成trunc(x+0.000001) 出错率会低一点QAQ
var n,s:longint;
begin
read(n);
repeat
s:=trunc(ln(n)/ln()+0.00001);
write(s+,' ');
n:=n-( << s);
until n=;
end.
A
B
题意：有m升油，n个数，可以用一升油数某一个数+1，再给一个mx 然后给 v1 v2 求 （v1*达到mx的数的个数+v2*整个数列的最小值）最大化。
思路：比赛的时候想的是拿部分分，然后弄不出来，然后觉得是二分，敲不出来，就拿到了10分。
补题的时候有一个新的思路，枚举达到mx的数的个数，然后再二分最小值。
然后check就贪心的弄，设达到mx的数的个数为num，二分到的最小值为x
然后贪心算需要的油就可以check了，但是这样要多一个n的复杂度。
显然o(n^2 logn)的复杂度是要tle的。
想想优化，由于贪心，所以已经先把原数列排序了，辣么就满足的单调性。
满足单调性就可以二分
所以求排序后的数列的前缀和，然后在二分里在套一个二分就好了
复杂度 o(n logn ^2)
var a,b,c,sum:array[..]of int64;
n,mx,v1,v2:int64;
have,z:int64;
l,r,m:longint;
ans,num,ansmin,ansnum:int64;
i,j:longint;
procedure qs(l,r:longint);
var i,j,t,m:longint;
begin
i:=l;
j:=r;
m:=a[(l+r)>>];
repeat
while a[i]>m do inc(i);
while a[j]<m do dec(j);
if i<=j then
begin
t:=a[i];a[i]:=a[j];a[j]:=t;
t:=c[i];c[i]:=c[j];c[j]:=t;
inc(i);
dec(j);
end;
until i>j;
if l<j then qs(l,j);
if i<r then qs(i,r);
end;
function find(x:longint):longint;
var l,r,m:longint;
begin
l:=num+;
r:=n;
while l<=r do
begin
m:=(l+r) >>;
if a[m]>x then l:=m+ else r:=m-;
end;
exit(l);
end;
function check(x:longint):boolean;
var i:longint;
need:int64;
begin
need:=z;
i:=find(x);
inc(need,x*(n-i+)-(sum[n]-sum[i-]));
if need>have then exit(false) else exit(true);
end;
begin
read(n,mx,v1,v2,have);
for i:= to n do
begin
read(a[i]);
b[i]:=a[i];
c[i]:=i;
end;
qs(,n);
for i:= to n do
sum[i]:=sum[i-]+a[i];
for i:= to n do
begin
num:=i;
z:=mx*num-sum[num];
if z>=have then continue;
l:=;
r:=mx;
while l<r do
begin
m:=(l+r+)>>;
if check(m) then l:=m else r:=m-;
end;
if ans<num*v1+l*v2 then
begin
ans:=num*v1+l*v2;
ansnum:=num;
ansmin:=l;
end;
end;
writeln(ans);
for i:= to ansnum do
b[c[i]]:=mx;
for i:= to n do
if b[i]<ansmin then write(ansmin,' ')else write(b[i],' ');
writeln;
end.
B
C
题意：一个数列，支持两个操作，1.L~R 加上x 2.查询当前序列，如果从任意一个位置开始，两边严格递减的最大长度。
思路：比赛的时候完全没思路，暴力都不会打。
补题觉得可以线段树弄，每次维护区间最大长度，左边的值，右边的值，然后乱维护....QAQ
结果不会打。所以pass掉吧...