TLE
#include<bits/stdc++.h>
using namespace std;
const int N=1000010;
int a[N],x,ans;
int main()
{
cin>>x;
for(int i=1;i<=x;i++) cin>>a[i];
for(int i=1;i<=x;i++)
for(int j=i;j<=x;j++)
{
if((abs(a[i]-a[j])%200==0)&&(i!=j)) ans++;
}
cout<<ans;
return 0;
}