#define f(P,Q,R)for(r=~n;l<r;P)x=a[l]Q-a[r]?s++,R:0;l=s=!printf("%d ",s);
a[1<<18],s,l,r,x;main(n){for(;~scanf("%d",a-n--););qsort(a,-++n,4,"\x8b\7+\6\xc3");f(r--,<,l++)f(l++,>,r--)f(l+=a[l]+a[r]<0?:x/r--,==,r)}