身败名裂

if(N[i]==mi)continue;
不然会错惨

日常水题掉正确率……

树状数组瞎XX抡

二维偏序，cdq分治.

同被0坑了一下

把long long用int输出了，还疑惑为啥爆了。唉

2016年12月7日20:06:40

。。。就当复习树状数组了，，好久没写过这玩意了。。

发誓以后离散化cnt初始化为1，否则T成HQX了

弄了半天，，原来是因为忘了ai有0的时候，，，
ai为零的时候直接崩掉了。。。。

竟然把a[i]的范围当成了n的范围。。。

蒟蒻默默地用归并过掉了

回复 @hzoi55223 :
comp1函数呵呵的写错了、、

我承认没有看题就直接做，然后成功把正序对求成了逆序对

又逗比的把ans改成longlong 输出却还是%d。。。

回复 @新的风暴已经��现 :
你怎么不弄个凹凸曼的头像 = =

为什么所有数都要+1？有大神回答一下吗？

回复 @SUNYU :
在勾选“允许查看你提交的代码”后就不用在评论里粘代码了，影响评论的可读性

var
a,l,r,c:array[0..50100]of int64;
i,j,k,m,n:longint;
ans:int64;
function low(x:longint):longint;
begin
exit(x and (x xor(x-1)));
end;
procedure change(i,k:longint);
begin
while i<=35000 do
begin
c[i]:=c[i]+k;
i:=i+low(i);
end;
end;
function sum(i:longint):longint;
var
s:longint;
begin
s:=0;
while i>0 do
begin
s:=s+c[i];
i:=i-low(i);
end;
exit(s);
end;
begin
assign(input,'e:\1.txt');reset(input);
//assign(output,'queueb.out');rewrite(output);
read(n);
for i:=1 to n do read(a[i]);
for i:=1 to n do a[i]:=a[i]+1;//另外树状数组不能处理下标为1的情况，因为low函数一直返回0，会死循环，所以各加1
for i:=1 to n do
begin
change(a[i],1);
l[i]:=sum(a[i]-1);
end;
fillchar(c,sizeof(c),0);
for i:=n downto 1 do
begin
change(a[i],1);
r[i]:=sum(a[i]-1);
end;
for i:=1 to n do
ans:=ans+l[i]*r[i];
writeln(ans);
close(output);
end.