#include <iostream>
#include <cmath>
#include <algorithm>
#include <fstream>
using namespace std;
ifstream f("triang.in");
ofstream g("triang.out");

int n,i,k,eroare=0.003,cnt,j,p;
double x,y,pozx[1501],pozy[1501],latura,abscisa,ordonata,numere[1501];

int binara(double lat)
{
    int st=1,dr=k,mij;
    while(st<=dr)
    {
        mij=(st+dr)/2;
        if(abs(numere[mij]-lat)<=eroare)
            return 1;
        else
            if(numere[mij]<lat)
            st=mij+1;
        else
            dr=mij-1;
    }
    return 0;
}

int main()
{
    f>>n;
    for(i=1;i<=n;i++)
    {
        f>>x>>y;
        k++;
        pozx[k]=x;
        pozy[k]=y;
        numere[k]=x;
        numere[k+1]=y;
    }
sort(pozx+1,pozx+k+1);
sort(pozy+1,pozy+k+1);
sort(numere+1,numere+k+1);

for(i=1;i<=k;i++)
{
 for(j=i+1;j<=k;j++)
 {
          abscisa=pozx[i]+pozx[j];
          ordonata=pozy[i]+pozy[j];
          latura=sqrt((abscisa*abscisa)+(ordonata*ordonata));
          if(binara(latura)==1)
             cnt++;
 }
}
g<<cnt;
    return 0;
}