#include <bits/stdc++.h>
//#define int long long
#define fast ios_base::sync_with_stdio(false); cin.tie(nullptr); cout.tie(nullptr);
#define lg2(n) (63-__builtin_clzll(n))
#define mask(n) (1LL << (n))
#define TASK ""
#define openfile(); if( fopen(TASK".inp", "r")){freopen(TASK".inp", "r", stdin);freopen(TASK".out", "w", stdout);}
#define lc(n) (n << 1)
#define rc(n) ((n << 1) | 1)
#define fi first
#define se second
#define FOR(i, l, r, k) for( int i = l; i <= r; i += k)
#define FOD(i, r, l, k) for( int i = r; i >= l; i -= k)
#define mii map<int,int>
#define umi unordered_map<int, int>
#define pii pair<int,int>
#define vi vector<int>
using namespace std;
//const int oo = 1e18;
const int mod = 1e9 + 7;
const int nmax = 2e5 + 8;
const int base = 311;
const int N = 1e6 + 8;
int n, a[nmax], d[N];
bitset<N> p;
void sieve(){
p[1] = 1;
for(int i = 2; i * i < N; ++i){
if(!p[i]){
for(int j = i * i; j < N; j += i){
p[j] = 1;
}
}
}
}
int calc(int n){
int cnt = 0;
// int res = n;
for(int i = 1; i * i <= n; ++i){
if(n % i == 0){
if(!p[n / i]) cnt += d[i];
if(!p[i] && i * i != n) cnt += d[n / i];
}
}
return cnt;
}
main(){
fast;
openfile();
sieve();
cin >> n;
for(int i = 1; i <= n; ++i){
cin >> a[i];
d[a[i]]++;
}
int ans = 0;
for(int i = 1; i <= n; ++i){
ans += calc(a[i]);
// cout << a[i] << ' ' << calc(a[i]) << endl;
}
cout << ans;
}
I2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+Ci8vI2RlZmluZSBpbnQgbG9uZyBsb25nCiNkZWZpbmUgZmFzdCBpb3NfYmFzZTo6c3luY193aXRoX3N0ZGlvKGZhbHNlKTsgY2luLnRpZShudWxscHRyKTsgY291dC50aWUobnVsbHB0cik7CiNkZWZpbmUgbGcyKG4pICg2My1fX2J1aWx0aW5fY2x6bGwobikpCiNkZWZpbmUgbWFzayhuKSAoMUxMIDw8IChuKSkKI2RlZmluZSBUQVNLICIiCiNkZWZpbmUgb3BlbmZpbGUoKTsgIGlmKCBmb3BlbihUQVNLIi5pbnAiLCAiciIpKXtmcmVvcGVuKFRBU0siLmlucCIsICJyIiwgc3RkaW4pO2ZyZW9wZW4oVEFTSyIub3V0IiwgInciLCBzdGRvdXQpO30KI2RlZmluZSBsYyhuKSAobiA8PCAxKQojZGVmaW5lIHJjKG4pICgobiA8PCAxKSB8IDEpCgojZGVmaW5lIGZpIGZpcnN0CiNkZWZpbmUgc2Ugc2Vjb25kCiNkZWZpbmUgRk9SKGksIGwsIHIsIGspIGZvciggaW50IGkgPSBsOyBpIDw9IHI7IGkgKz0gaykKI2RlZmluZSBGT0QoaSwgciwgbCwgaykgZm9yKCBpbnQgaSA9IHI7IGkgPj0gbDsgaSAtPSBrKQoKI2RlZmluZSBtaWkgbWFwPGludCxpbnQ+CiNkZWZpbmUgdW1pIHVub3JkZXJlZF9tYXA8aW50LCBpbnQ+CiNkZWZpbmUgcGlpIHBhaXI8aW50LGludD4KI2RlZmluZSB2aSB2ZWN0b3I8aW50PgoKdXNpbmcgbmFtZXNwYWNlIHN0ZDsKCi8vY29uc3QgaW50IG9vID0gMWUxODsKY29uc3QgaW50IG1vZCA9IDFlOSArIDc7CmNvbnN0IGludCBubWF4ID0gMmU1ICsgODsKY29uc3QgaW50IGJhc2UgPSAzMTE7CmNvbnN0IGludCBOID0gMWU2ICsgODsKCgppbnQgbiwgYVtubWF4XSwgZFtOXTsKYml0c2V0PE4+IHA7Cgp2b2lkIHNpZXZlKCl7CiAgICBwWzFdID0gMTsKICAgIGZvcihpbnQgaSA9IDI7IGkgKiBpIDwgTjsgKytpKXsKICAgICAgICBpZighcFtpXSl7CiAgICAgICAgICAgIGZvcihpbnQgaiA9IGkgKiBpOyBqIDwgTjsgaiArPSBpKXsKICAgICAgICAgICAgICAgIHBbal0gPSAxOwogICAgICAgICAgICB9CiAgICAgICAgfQogICAgfQp9CmludCBjYWxjKGludCBuKXsKICAgIGludCBjbnQgPSAwOwovLyAgICBpbnQgcmVzID0gbjsKICAgIGZvcihpbnQgaSA9IDE7IGkgKiBpIDw9IG47ICsraSl7CiAgICAgICAgaWYobiAlIGkgPT0gMCl7CiAgICAgICAgICAgIGlmKCFwW24gLyBpXSkgY250ICs9IGRbaV07CiAgICAgICAgICAgIGlmKCFwW2ldICYmIGkgKiBpICE9IG4pIGNudCArPSBkW24gLyBpXTsKICAgICAgICB9CiAgICB9CiAgICByZXR1cm4gY250Owp9CgptYWluKCl7CiAgICBmYXN0OwogICAgb3BlbmZpbGUoKTsKICAgIHNpZXZlKCk7CiAgICBjaW4gPj4gbjsKICAgIGZvcihpbnQgaSA9IDE7IGkgPD0gbjsgKytpKXsKICAgICAgICBjaW4gPj4gYVtpXTsKICAgICAgICBkW2FbaV1dKys7CiAgICB9CiAgICBpbnQgYW5zID0gMDsKICAgIGZvcihpbnQgaSA9IDE7IGkgPD0gbjsgKytpKXsKICAgICAgICBhbnMgKz0gY2FsYyhhW2ldKTsKLy8gICAgICAgIGNvdXQgPDwgYVtpXSA8PCAnICcgPDwgY2FsYyhhW2ldKSA8PCBlbmRsOwogICAgfQogICAgY291dCA8PCBhbnM7Cn0K