#include <bits/stdc++.h>
using namespace std;
#define FOR(i, a, b) for (int i = (a), _b = (b); i <= _b; i++)
#define FORD(i, b, a) for (int i = (b), _a = (a); i >= _a; i--)
#define REP(i, n) for (int i = 0, _n = (n); i < _n; i++)
#define MAX 100005
int parent[MAX];
int n, Max = 0;
struct menkh {
int u, v, w;
};
vector<menkh> adj;
int root(int v) {
return v == parent[v] ? v : parent[v] = root(parent[v]);
}
bool unite(int u, int v) {
u = root(u), v = root(v);
if (u == v) return false;
parent[v] = u;
return true;
}
void solve() {
scanf("%d", &n);
vector<int> p(n + 1);
FOR(i, 1, n) {
scanf("%d", &p[i]);
Max = max(p[i], Max);
}
sort(p.begin() + 1, p.end());
p.erase(unique(p.begin() + 1, p.end()), p.end());
n = p.size() - 1;
FOR(i, 1, n) parent[i] = i;
FOR(i, 1, n) {
for (int k = 1; k * p[i] <= Max; k++) {
int v = lower_bound(p.begin() + 1, p.begin() + n + 1, k * p[i]) - p.begin();
if (v == n + 1) break;
if (p[v] <= (k + 1) * p[i]) adj.push_back({i, v, p[v] % p[i]});
}
}
sort(adj.begin(), adj.end(), [](menkh A, menkh B) {
return A.w < B.w;
});
long long answer = 0;
REP(i, (int)adj.size()) {
if (unite(adj[i].u, adj[i].v)) answer += adj[i].w;
}
printf("%lld\n", answer);
}
int main() {
solve();
}
I2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+CnVzaW5nIG5hbWVzcGFjZSBzdGQ7CgojZGVmaW5lIEZPUihpLCBhLCBiKSBmb3IgKGludCBpID0gKGEpLCBfYiA9IChiKTsgaSA8PSBfYjsgaSsrKQojZGVmaW5lIEZPUkQoaSwgYiwgYSkgZm9yIChpbnQgaSA9IChiKSwgX2EgPSAoYSk7IGkgPj0gX2E7IGktLSkKI2RlZmluZSBSRVAoaSwgbikgZm9yIChpbnQgaSA9IDAsIF9uID0gKG4pOyBpIDwgX247IGkrKykKCiNkZWZpbmUgTUFYIDEwMDAwNQppbnQgcGFyZW50W01BWF07CmludCBuLCBNYXggPSAwOwoKc3RydWN0IG1lbmtoIHsKICAgIGludCB1LCB2LCB3Owp9OwoKdmVjdG9yPG1lbmtoPiBhZGo7CgppbnQgcm9vdChpbnQgdikgewogICAgcmV0dXJuIHYgPT0gcGFyZW50W3ZdID8gdiA6IHBhcmVudFt2XSA9IHJvb3QocGFyZW50W3ZdKTsKfQoKYm9vbCB1bml0ZShpbnQgdSwgaW50IHYpIHsKICAgIHUgPSByb290KHUpLCB2ID0gcm9vdCh2KTsgCiAgICBpZiAodSA9PSB2KSByZXR1cm4gZmFsc2U7CiAgICBwYXJlbnRbdl0gPSB1OwogICAgcmV0dXJuIHRydWU7Cn0KCnZvaWQgc29sdmUoKSB7CiAgICBzY2FuZigiJWQiLCAmbik7IAogICAgdmVjdG9yPGludD4gcChuICsgMSk7CiAgICBGT1IoaSwgMSwgbikgewogICAgICAgIHNjYW5mKCIlZCIsICZwW2ldKTsgCiAgICAgICAgTWF4ID0gbWF4KHBbaV0sIE1heCk7CiAgICB9CgogICAgc29ydChwLmJlZ2luKCkgKyAxLCBwLmVuZCgpKTsKICAgIHAuZXJhc2UodW5pcXVlKHAuYmVnaW4oKSArIDEsIHAuZW5kKCkpLCBwLmVuZCgpKTsKICAgIG4gPSBwLnNpemUoKSAtIDE7CiAgICBGT1IoaSwgMSwgbikgcGFyZW50W2ldID0gaTsKCiAgICBGT1IoaSwgMSwgbikgewogICAgICAgIGZvciAoaW50IGsgPSAxOyBrICogcFtpXSA8PSBNYXg7IGsrKykgewogICAgICAgICAgICBpbnQgdiA9IGxvd2VyX2JvdW5kKHAuYmVnaW4oKSArIDEsIHAuYmVnaW4oKSArIG4gKyAxLCBrICogcFtpXSkgLSBwLmJlZ2luKCk7CiAgICAgICAgICAgIGlmICh2ID09IG4gKyAxKSBicmVhazsgCiAgICAgICAgICAgIGlmIChwW3ZdIDw9IChrICsgMSkgKiBwW2ldKSBhZGoucHVzaF9iYWNrKHtpLCB2LCBwW3ZdICUgcFtpXX0pOwogICAgICAgIH0KICAgIH0KCiAgICBzb3J0KGFkai5iZWdpbigpLCBhZGouZW5kKCksIFtdKG1lbmtoIEEsIG1lbmtoIEIpIHsKICAgICAgICByZXR1cm4gQS53IDwgQi53OwogICAgfSk7CgogICAgbG9uZyBsb25nIGFuc3dlciA9IDA7CiAgICBSRVAoaSwgKGludClhZGouc2l6ZSgpKSB7CiAgICAgICAgaWYgKHVuaXRlKGFkaltpXS51LCBhZGpbaV0udikpIGFuc3dlciArPSBhZGpbaV0udzsKICAgIH0KCiAgICBwcmludGYoIiVsbGRcbiIsIGFuc3dlcik7Cn0KCmludCBtYWluKCkgewogICAgc29sdmUoKTsKfQ==