#include using namespace std; //#pragma GCC optimize("Ofast") #define rep(i,n) for(ll i=0;i=0;i--) #define perl(i,r,l) for(ll i=r-1;i>=l;i--) #define fi first #define se second #define pb push_back #define ins insert #define pqueue(x) priority_queue,greater> #define all(x) (x).begin(),(x).end() #define CST(x) cout<> #define rev(x) reverse(x); using ll=long long; using vl=vector; using vvl=vector>; using pl=pair; using vpl=vector; using vvpl=vector; const ll MOD=1000000007; const ll MOD9=998244353; const int inf=1e9+10; const ll INF=4e18; const ll dy[9]={1,0,-1,0,1,1,-1,-1,0}; const ll dx[9]={0,1,0,-1,1,-1,1,-1,0}; template inline bool chmin(T& a, T b) { if (a > b) { a = b; return true; } return false; } template inline bool chmax(T& a, T b) { if (a < b) { a = b; return true; } return false; } ll msb(ll bit){ ll cnt=-1; rep(i,60)if(bit>>i&1)cnt=i; return cnt; } ll extGCD(ll bit,ll cit){ ll s=msb(bit),t=msb(cit); if(s lpf;// least prime factor vector prime;// prime table osak(long long n){//linear_sieve lpf=vector(n+1,-1); for (int d = 2; d <= n; ++d) { if(lpf[d]==-1){ lpf[d]=d;prime.emplace_back(d); } for(auto p:prime){ if(p*d>n||p>lpf[d])break; lpf[p*d]=p; } } } map factor(int n) { map factor; while (n > 1) { factor[lpf[n]]++; n /= lpf[n]; } return factor; } vector divisor(int N){//O(div.size()) map facs=factor(N); vector ret={1}; for(auto p:facs){ ll range=ret.size(); ll now=1; for(int i=0;i> n; vl a(n);rep(i,n)cin >> a[i]; ll g=0; rep(i,n)g=extGCD(g,a[i]); ll m=1e5+10; vl dp(1e5+10); rep(i,n)dp[a[i]]+=a[i]; osak os(m); for(auto p:os.prime){ for(ll k=m/p;k>0;k--)dp[k]+=dp[k*p]; } ll ans=INF; rep(bit,1<<20){ ll f=0; rep(i,20){ if(bit>>i&1)f^=g<=m||f==0)continue; chmin(ans,dp[1]-dp[f]+dp[f]/f); } cout << ans << endl; }