#include #include using namespace std; using namespace atcoder; istream &operator>>(istream &is, modint &a) { long long v; is >> v; a = v; return is; } ostream &operator<<(ostream &os, const modint &a) { return os << a.val(); } istream &operator>>(istream &is, modint998244353 &a) { long long v; is >> v; a = v; return is; } ostream &operator<<(ostream &os, const modint998244353 &a) { return os << a.val(); } istream &operator>>(istream &is, modint1000000007 &a) { long long v; is >> v; a = v; return is; } ostream &operator<<(ostream &os, const modint1000000007 &a) { return os << a.val(); } typedef long long ll; typedef vector> Graph; typedef pair pii; typedef pair pll; #define FOR(i,l,r) for (int i = l;i < (int)(r); i++) #define rep(i,n) for (int i = 0;i < (int)(n); i++) #define all(x) x.begin(), x.end() #define rall(x) x.rbegin(), x.rend() #define my_sort(x) sort(x.begin(), x.end()) #define my_max(x) *max_element(all(x)) #define my_min(x) *min_element(all(x)) template inline bool chmax(T& a, T b) { if (a < b) { a = b; return 1; } return 0; } template inline bool chmin(T& a, T b) { if (a > b) { a = b; return 1; } return 0; } const int INF = (1<<30) - 1; const ll LINF = (1LL<<40) - 1; const int MOD = 998244353; const int MOD2 = 1e9+7; const double PI = acos(-1); vector di = {1,0,-1,0}; vector dj = {0,1,0,-1}; #ifdef LOCAL # include # define debug(...) debug_print::multi_print(#__VA_ARGS__, __VA_ARGS__) #else # define debug(...) (static_cast(0)) #endif using mint = modint998244353; struct S{ mint a, b, sum; int size; }; using F = pair; S op(S lhs, S rhs){ return {lhs.a + rhs.a, lhs.b + rhs.b, lhs.sum + rhs.sum, lhs.size + rhs.size}; } S e(){ return {0, 0, 0, 0}; } S mapping(F f, S x){ return {x.a + f.first * x.size, x.b + f.second * x.size, x.sum + ((x.a * f.second) + (x.b * f.first)) + x.size * f.first * f.second, x.size}; } F composition(F f, F g){ return {f.first + g.first, f.second + g.second}; } F id(){ return {0, 0}; } int main(){ cin.tie(0); ios_base::sync_with_stdio(false); int N; cin >> N; vector A(N); rep(i, N) cin >> A[i]; vector dat(N); rep(i, N){ S v = e(); v.a = -LINF; v.b = LINF; v.size = 1; v.sum = 0; dat[i] = v; } lazy_segtree seg(dat); mint ans = 0; vector mx_stk, mn_stk; for(int i = N - 1; i >= 0; i--){ while(!mx_stk.empty() && A[mx_stk.back()] < A[i]) { seg.apply(i, mx_stk.back() + 1, F{A[i] - A[mx_stk.back()], 0}); mx_stk.pop_back(); } while(!mn_stk.empty() && A[mn_stk.back()] > A[i]) { seg.apply(i, mn_stk.back() + 1, F{0, A[i] - A[mn_stk.back()]}); mn_stk.pop_back(); } S v = e(); v.a = A[i]; v.b = A[i]; v.sum = (mint)A[i] * (mint)A[i]; v.size = 1; seg.set(i, v); ans += seg.prod(i, N).sum; mx_stk.push_back(i); mn_stk.push_back(i); debug(i, mx_stk, mn_stk, ans); } cout << ans << endl; }