// #define _GLIBCXX_DEBUG #include #include #define rep(i,b) for(int i=0;i=0;i--) #define rep1(i,b) for(int i=1;i=x;i--) #define fore(i,a) for(auto i:a) #define fore1(i,a) for(auto &i:a) #define rng(x) (x).begin(), (x).end() #define rrng(x) (x).rbegin(), (x).rend() #define sz(x) ((int)(x).size()) #define pb push_back #define fi first #define se second #define pcnt __builtin_popcountll using namespace std; using namespace atcoder; using ll = long long; using ld = long double; template using mpq = priority_queue, greater>; template bool chmax(T &a, const T &b) { if (a bool chmin(T &a, const T &b) { if (b ll sumv(const vector&a){ll res(0);for(auto&&x:a)res+=x;return res;} bool yn(bool a) { if(a) {cout << "Yes" << endl; return 1;} else {cout << "No" << endl; return 0;}} #define dame { cout << "No" << endl; return 0;} #define dame1 { cout << -1 << endl; return 0;} #define test(x) cout << "test" << x << endl; #define deb(x,y) cout << x << " " << y << endl; #define debp(p) cout << p.fi << " " << p.se << endl; #define deb3(x,y,z) cout << x << " " << y << " " << z << endl; #define deb4(x,y,z,x2) cout << x << " " << y << " " << z << " " << x2 << endl; #define out cout << ans << endl; #define outd cout << fixed << setprecision(20) << ans << endl; #define outm cout << ans.val() << endl; #define outv fore(yans , ans) cout << yans << "\n"; #define outdv fore(yans , ans) cout << yans.val() << "\n"; #define show(x) cerr<<#x<<" = "<;using pil = pair;using pli = pair;using pii = pair;using pdd = pair; using tp = tuple; using vi = vector;using vd = vector;using vl = vector;using vs = vector;using vb = vector; using vpii = vector;using vpli = vector;using vpll = vector;using vpil = vector; using vvi = vector>;using vvl = vector>;using vvs = vector>;using vvb = vector>; using vvpii = vector>;using vvpli = vector>;using vvpll = vector;using vvpil = vector; using mint = modint998244353; using vm = vector; using vvm = vector>; vector dx={1,0,-1,0,1,1,-1,-1},dy={0,1,0,-1,1,-1,1,-1}; ll gcd(ll a, ll b) { return a?gcd(b%a,a):b;} ll lcm(ll a, ll b) { return a/gcd(a,b)*b;} #define yes {cout <<"Yes"< f, primes; Sieve(int n=1):n(n), f(n+1) { //初期化、f[x] = (xの最も小さい素因数) f[0] = f[1] = -1; for (ll i = 2; i <= n; ++i) { if (f[i]) continue; primes.push_back(i); f[i] = i; for (ll j = i*i; j <= n; j += i) { if (!f[j]) f[j] = i; } } } bool isPrime(int x) { return f[x] == x;} //素数判定 vector factorList(int x) {//素因数分解、xの素因数を小さいものから個数分列挙 vector res; while (x != 1) { res.push_back(f[x]); x /= f[x]; } return res; } vector factor(int x) {//素因数分解その2、xの素因数を小さいものから(素因数、個数)の形で列挙 vector fl = factorList(x); if (fl.size() == 0) return {}; vector res(1, pii(fl[0], 0)); for (int p : fl) { if (res.back().first == p) { res.back().second++; } else { res.emplace_back(p, 1); } } return res; } vector factor(ll x) {//素因数分解その2-2、xがllの場合 vector res; for (int p : primes) { int y = 0; while (x%p == 0) x /= p, ++y; if (y != 0) res.emplace_back(p,y); } if (x != 1) res.emplace_back(x,1); return res; } } sieve(1e6); // .primes : n以下の素数を小さい順で格納しているベクトル。 // .isPrime(int x) : xの素数判定。boolで返す // .factorList(int x) : xの素因数分解。xの素因数を小さいものから個数分列挙。vectorで返す。 // .factor(int x) : 素因数分解その2、xの素因数を小さいものからpair{素因数、個数}の形で列挙。vectorで返す。xはllでもok。 // 宣言方法 : n=1e6(デフォルト)で初期化している。 // 注意点 : factorList、factorは呼び出し毎に約数個分の計算時間がかかってしまうため、何度も呼び出すときは予め別の配列に格納しておくこと。 struct math_lib{ vvl div,mul; void div_init(int n){ div.resize(n+1); mul.resize(n+1); for(ll i = 1;i <= n;i++){ for(ll j = i;j <= n;j+=i){ div[j].pb(i); mul[i].pb(j); } } return; } vl divisor(ll x){ vl res; for(ll i=1;i*i<=x;i++){ if (x%i != 0) continue; res.pb(i); if (i*i != x) res.pb(x/i); } sort(rng(res)); return res; } ll sqrt(ll x) { ll l = 0, r = ll(2e9)+1; while (l+1= LLONG_MAX/a) break; tmp *= a; ret++; } ret--; return ret; } ll pow(ll x , ll a){ assert(x > 0); assert(a >= 0); ll ret = 1; rep(_,a){ assert (ret < LLONG_MAX/x); ret *= x; } return ret; } ll base(ll x,int a){ ll ans=0,y; for (ll i=0;x>0;i++){ y = x/a; ans += (x - y*a)*pow(10,i); x = y; } return ans; } string baseS(ll x,int a){ string ans; ll y; for (ll i=0;x>0;i++){ y = x/a; ans += '0' + (x - y*a); x = y; } reverse(rng(ans)); return ans; } ll inv(vl& v){ int n = sz(v); map mp; fore(y,v) mp[y] = 0; int m = 0; fore1(y,mp) y.se = m++; fenwick_tree fw(m); ll ret = 0; rep(i,n){ int k = mp[v[i]]; ret += fw.sum(k+1,m); fw.add(k,1); } return ret; } } math; // .div.mul : div[i]、mul[i]はそれぞれiの約数、倍数を格納している。 // .div_init(n) : div,mulを初期化。引数はnまで。n < 1e6 ~ 1e7。 // .divisor(x) : xの約数列挙。xは64bit整数。 // .sqrt(x) : floor(sqrt(x))。xは64bit整数。誤差は発生しない。 // .logx(x , a) : floor(loga(x))。xは64bit整数。誤差は発生しない。 // .pow(x , a) : x^a。誤差は発生しない。 // .base(x , a) : x(10進数)をa進数表記に。1 <= a <= 10。戻り値はll型。 // .baseS(x , a) : x(10進数)をa進数表記に。1 <= a <= 10。戻り値はstring型。 // .inv(v) : vの転倒数。 int main(){ int n; cin>>n; int mx = 1e6; vm mp(mx); mint ans = 0; math.div_init(mx+1); vi a(n); rep(i,n) cin>>a[i]; // mp[1] = 1; rep(i,n){ vpii p = sieve.factor(a[i]); int pa = 1; fore(y , p) pa *= y.fi; vl v = math.div[pa]; mint tmp = 1; fore(y , v){ if (y == 1) continue; int sub = y; int k = sz(sieve.factor(sub)); // showdeb(sub,k); tmp += mp[sub] * (2*(k%2)-1); // mp[sub] *= 2; // mp[sub]++; } fore(y , v){ if (y == 1) continue; mp[y] += tmp; } // show(i); // rep(j,7){ // cout << mp[j].val() << " "; // } // cout << endl; ans += tmp; // show(i); // cout << tmp.val() << endl; } outm; // 消せ!!!!!! #define _GLIBCXX_DEBUG // priority_queue でしぬ return 0; }