#include<fstream>
using namespace std;
ifstream f("pairs.in");
ofstream g("pairs.out");
int v[1000001],d[1000001];
long long i,j,x,n,p[10000001];
int main()
{f>>n;
long long maxi=0;
for(i=1;i<=n;++i)
{f>>x;
v[x]=1;
if(maxi<x)
	maxi=x;
}
for(i=2;i<=maxi;p[i]=1,++i);
for(i=2;i<=maxi;++i) 
	if(p[i]==1)
		for(j=i;j<=maxi;j+=i)
		{p[j]*=i;
		++d[j];
		}
long long s=(n*(n-1))/2;
for(i=2;i<=maxi;++i)
	if(p[i]==i)
	{long long c;
	for(j=i;j<=maxi;j=j+i)
		c+=v[j];
	long long v=(c*(c-1))/2;
	if(d[i]&1)
		s-=v;
	else
		s+=v;
	}
g<<s<<'\n';
return 0;
}