#include<fstream>
#include<cstring>
#include<algorithm>
#include<unordered_map>
#include<cmath>
using namespace std;

unordered_map<float,float>mymap;
int n,i,j,k,rez;
const float constanta=10000;
float x[1005],y[1005];

bool ok(float a,float b)
{
    unordered_map<float,float> :: iterator it;
    it=mymap.find(a);
    while (it!=mymap.end() && fabs(it->first-a)<=0.000000001 )
    {
        if (fabs(it->second-b)<=0.000000001) return true;
        ++it;
    }
    return false;
}

ifstream f("patrate3.in");
ofstream g("patrate3.out");
int main()   //adun 10 000
{
    f>>n;
    for(i=1;i<=n;i++)
    {
        f>>x[i]>>y[i];
        x[i]+=constanta;
        y[i]+=constanta;
        mymap[x[i]]=y[i];
    }
    for(i=1;i<=n;i++)
        for(j=1;j<i;j++)
        {
            float x1temp=x[i]+y[i]-y[j];
            float y1temp=x[j]+y[i]-x[i];
            float x2temp=x[j]+y[i]-y[j];
            float y2temp=x[j]+y[j]-x[i];
            if (ok(x1temp,y1temp) && ok(x2temp,y2temp))
                rez++;
        }
    g<<rez<<"\n";
    return 0;
}