#include<stdio.h>
FILE *f,*g;
unsigned long int i,n,v[10000],nr;

int prim( int x, int y)
{
int aux,r;
if(x<y)
{
aux=x;
x=y;
y=aux;
}
do
{
r=x%y;
x=y;
y=r;
}
while(r!=0);
if(x==1)
return 1;
else
return 0;
}
int main()
{
f=fopen("pairs.in","r");
g=fopen("pairs.out","w");
fscanf(f,"%ld",&n);
for(i=1;i<=n;i++)
fscanf(f,"%ld",&v[i]);
int x,y,j;
for(i=1;i<n;i++)
{
x=v[i];
for(j=i+1;j<=n;j++)
{
y=v[j];
if((x!=y) && prim(x,y))
nr++;
}
}
fprintf(g,"%ld",nr);
fcloseall();
return 0;
}