#include <stdio.h>
FILE *f=fopen("pairs.in","r");
FILE *g=fopen("pairs.out","w");
long n,m[1000],k;
void citeste(){
 fscanf(f,"%ld",&n);
 for(int i=1;i<=n;i++) fscanf(f,"%ld",&m[i]);
}
int cmmdc(long a,long b){
 long r;
do{
r=a%b;
a=b;
b=r;
}
while (b!=0);
if(a==1) return 1;
return 0;
}
int main(){
 citeste();
 for(int i=1;i<n;i++){
  for(int j=i+1;j<=n;j++){
   if(cmmdc(m[i],m[j])) k++;
  }
 }
 fprintf(g,"%ld",k);
 return 0;
}