#include<bits/stdc++.h>
using namespace std;

typedef long long ll;
typedef pair<int,int> P;

#define p_ary(ary,a,b) do { cout << "["; for (int count = (a);count < (b);++count) cout << ary[count] << ((b)-1 == count ? "" : ", "); cout << "]\n"; } while(0)
#define p_map(map,it) do {cout << "{";for (auto (it) = map.begin();;++(it)) {if ((it) == map.end()) {cout << "}\n";break;}else cout << "" << (it)->first << "=>" << (it)->second << ", ";}}while(0)

template<typename T1,typename T2>ostream& operator<<(ostream& os,const pair<T1,T2>& a) {os << "(" << a.first << ", " << a.second << ")";return os;}

const char newl = '\n';

int main() {
    int n,s = 450;
    cin >> n;
    vector<ll> cnt(200010,0);
    for (int i = 0;i < n;++i) {
        int a;
        scanf("%d",&a);
        cnt[a]++;
    }
    ll ans = 0,sum = 0;
    for (int i = 0;i < 200010;++i) {
        ans += sum*cnt[i];
        sum += i*cnt[i];
    }
    for (int i = 1;i < s;++i) if (cnt[i]) {
        // for (int j = i+1;j < 200010;++j) ans += cnt[i]*(j%i);
        for (int j = 1;j < i;++j) for (int k = i+j;k < 200010;k += i) if (cnt[k]) ans += cnt[i]*cnt[k]*j;
    }
    vector<priority_queue<ll>> pq(s);
    sum = 0;
    ll sho = 0;
    for (int i = 200000;i >= s;--i) if (cnt[i]) {
        for (int j = 0;j < cnt[i];++j) {
            for (int k = 0;k < s;++k)  {
                while (!pq[k].empty() && pq[k].top()/i > k) {
                    ll t = pq[k].top();pq[k].pop();
                    sho -= k;
                    pq[t/i].push(t);
                    sho += t/i;
                }
            }
            ans += sum-sho*i;
            sum += i;
            pq[0].push(i);
        }
    }
    cout << ans << endl;
}