#include #include #include #include #include #include #include #include #include static const int MOD = 998244353; using ll = long long; using u32 = unsigned; using u64 = unsigned long long; using namespace std; template constexpr T INF = ::numeric_limits::max() / 32 * 15 + 208; template struct modint { u32 val; public: static modint raw(int v) { modint x; x.val = v; return x; } modint() : val(0) {} template modint(T v) { ll x = (ll)(v%(ll)(M)); if (x < 0) x += M; val = u32(x); } modint(bool v) { val = ((unsigned int)(v) % M); } modint& operator++() { val++; if (val == M) val = 0; return *this; } modint& operator--() { if (val == 0) val = M; val--; return *this; } modint operator++(int) { modint result = *this; ++*this; return result; } modint operator--(int) { modint result = *this; --*this; return result; } modint& operator+=(const modint& b) { val += b.val; if (val >= M) val -= M; return *this; } modint& operator-=(const modint& b) { val -= b.val; if (val >= M) val += M; return *this; } modint& operator*=(const modint& b) { u64 z = val; z *= b.val; val = (u32)(z % M); return *this; } modint& operator/=(const modint& b) { return *this = *this * b.inv(); } modint operator+() const { return *this; } modint operator-() const { return modint() - *this; } modint pow(long long n) const { modint x = *this, r = 1; while (n) { if (n & 1) r *= x; x *= x; n >>= 1; } return r; } modint inv() const { return pow(M-2); } friend modint operator+(const modint& a, const modint& b) { return modint(a) += b; } friend modint operator-(const modint& a, const modint& b) { return modint(a) -= b; } friend modint operator*(const modint& a, const modint& b) { return modint(a) *= b; } friend modint operator/(const modint& a, const modint& b) { return modint(a) /= b; } friend bool operator==(const modint& a, const modint& b) { return a.val == b.val; } friend bool operator!=(const modint& a, const modint& b) { return a.val != b.val; } }; using mint = modint; template class BIT { vector bit; int n, m; public: BIT(int n): n(n), bit(n){ m = 1; while(m < n) m <<= 1; } T sum(int k){ T ret = 0; for (; k > 0; k -= (k & -k)) ret += bit[k-1]; return ret; } void add(int k, T x){ for (k++; k <= bit.size(); k += (k & -k)) bit[k-1] += x; } T lower_bound(T x){ int i = -1; for (int j = m; j; j >>= 1) { if(i+j < bit.size() && bit[i+j] < x) x -= bit[i += j]; } return i; } }; int main() { int n; cin >> n; vector v(n); for (auto &&i : v) scanf("%d", &i); vector z(v); sort(z.begin(), z.end()); z.erase(unique(z.begin(), z.end()), z.end()); auto f = [&](int x){ return lower_bound(z.begin(),z.end(), x) - z.begin(); }; BIT S(n), T(n); vector lval(n), rval(n), lcnt(n), rcnt(n); for (int i = 0; i < n; ++i) { int cur = f(v[i]); lval[i] = S.sum(n)-S.sum(cur+1); lcnt[i] = T.sum(n)-T.sum(cur+1); S.add(cur, v[i]); T.add(cur, 1); } S = BIT(n), T = BIT(n); mint ans = 0; for (int i = n-1; i >= 0; --i) { int cur = f(v[i]); rval[i] = S.sum(cur); rcnt[i] = T.sum(cur); S.add(cur, v[i]); T.add(cur, 1); ans += v[i]*lcnt[i]*rcnt[i] + lval[i]*rcnt[i] + rval[i]*lcnt[i]; } cout << ans.val << "\n"; return 0; }