#include <bits/stdc++.h>

using namespace std;
ifstream in ("oite.in");
ofstream out("oite.out");
unordered_map <long long, int> m;
int a[1026];
int main()
{long long i,j,l,n,sol=0;
in>>n>>l;
for(i=1;i<=n;i++)
    in>>a[i];
for(i=1;i<=n;i++)
{
    for(j=i+1;j<=n;j++)
    if(l-a[i]-a[j]>0)
    {
        sol+=m[l-a[i]-a[j]];
    }
    for(j=1;j<i;j++)
    {
        m[a[i]+a[j]]++;
    }
}
out<<sol<<'\n';
    return 0;
}