#include<iostream.h>
#include<fstream.h>
int main()
{int n,M[1000],aux1,aux2,i,j,r,k=0;
fstream f("E:\\pairs.in",ios::in);
f>>n;
for(i=0;i<n;i++)
f>>M[i];
for(i=0;i<n-1;i++)
 for(j=i+1;j<n;j++)
   if(M[i]!=M[j])
    {  aux1=M[i];
       aux2=M[j];
      while(aux2!=0)
        {  r=aux1%aux2;
	   aux1=aux2;
	   aux2=r; }
	      if(aux1==1)
		k++;}
fstream g("E:\\pairs.out",ios::out);
g<<k;
return 0;       }