#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,"‹+Ã");f(r--,<,l++)f(l++,>,r--)f(l+=a[l]<-a[r]?:x/r--,==,r)}