#include<iostream.h>
#include<fstream.h>

long v[100001],x[1000001];
long n;

int binar(long m, int x, int y){
int i,t;
if(m==v[x] || m==v[y]) return 0;
if(m>=v[y]){  for(i=nr;i>=y;i--) v[i+1]=v[i];
	       ++nr;
	       v[y+1]=m;
	      return 1;}
if(m<=v[x]){ for(i=nr;i>=x;i--) v[i+1]=v[i];
	      ++nr;
	      v[x]=m;
	      return 1;
	      }
  while(y>x){
   t=(y+x)/2;
    if(v[t]==m) return 0;
    if(m<v[t]) y=t-1;
     else x=t+1;
     if(m==v[x]) return 0;
     if(m==v[y]) return 0;
     }
    if(m<=v[x] && m!=v[x]) { for(i=nr;i>=x;i--) v[i+1]=v[i];
	       ++nr;
	       v[x]=m;
	      return 1;}
    else { if(m==v[x] || m==v[y]) return 0;
	   for(i=nr;i>=y;i--) v[i+1]=v[i];
	       ++nr;
    v[y+1]=m;
	      return 1;}

 }
int prim(long x){
    long i;
     for(i=2;i<=x/2;i++) if(x%i==0) return 0;
     return 1;
 }    

int verificare(long x){
  int i;   
     for(i=1;i<=n;i++) if(v[i]==x) return 1;
      return 0;
  }    

int main(){
 int t;
 long i,j,max,p,res=0,u;
 
ifstream f("pairs.in");
ofstream g("pairs.out");
  f>>n;
  max=-1;
  for(i=1;i<=n;i++){   f>>v[i];
                       binar(v[i],1,i);          
		   }
		   max=v[n];
  for(i=1;i<=max;i++){
       for(j=1;j<=(max/i)*i;j++){
            if(verificare(i*j)) x[i]++;
        }
   }
   
  for(i=2;i<=max;i++){
     p=i;
     if(x[p]){
         t=0;
          for(u=2;u<=max;u++) if(prim(u)==1) if(p%u==0){ p/=u; t++;}
            if(p==1) { if(t%2==0) res-=x[i];
                       else res+=x[i];
                     }      
        }
   }        
                          
   
 
g<<n*(n-1)/2 - res;
f.close();
g.close();
return 0;
}