#include<fstream.h>

int main()
{fstream f("pairs.in",ios::in);
fstream g("pairs.out",ios::out);
unsigned long a[16000],i,j,n,nr=0,dim=0,a1,a2,x,rest;

f>>n;
f>>a[0];
for(i=1;i<n;i++)
 {f>>x;
  for(j=0;j<=dim;j++)
    if(a[j]==x)
     break;
  if(j>dim)
   {dim++;
    a[dim]=x;
   }
 }

for(i=0;i<=dim-1;i++)
 for(j=i+1;j<=dim;j++)
   {a1=a[i];
    a2=a[j];
    while(a2)
    {rest=a1%a2;
     a1=a2;
     a2=rest;
    }
   if(a1==1)
    nr++;
   }
nr;
g<<nr;
g.close();
f.close();
return 0;
}