#include <bits/stdc++.h>
using namespace std;

namespace IO {
	#if ONLINE_JUDGE
	#define getc() (IS == IT && (IT = (IS = ibuf) + fread(ibuf, 1, IL, stdin), IS == IT) ? EOF : *IS++)
	#else
	#define getc() getchar()
	#endif
	const int IL = 1 << 21, OL = 1 << 21;
	int olen = 0;
	char ibuf[IL], *IS = ibuf, *IT = ibuf, obuf[OL];
	inline int read() {
		register char ch = getc(); register int x = 0, f = 1;
		while(!isdigit(ch)) { if(ch == '-') f = -1; ch = getc(); }
		while(isdigit(ch)) x = x * 10 + ch - 48, ch = getc();
		return x * f;
	}
	inline double readdb() {
		register char ch = getc(); register double x = 0, f = 1;
		while(!isdigit(ch)) { if(ch == '-') f = -1; ch = getc(); }
		while(isdigit(ch)) x = x * 10 + ch - 48, ch = getc();
		if(ch == '.') {
			register double b = 0.1;
			ch = getc();
			while(isdigit(ch)) x += (ch - 48) * b, b *= 0.1, ch = getc();
		}
		return x * f;
	}
	inline int readstr(char *s) {
		register char ch = getc(); register int len = 0;
		while(!isalpha(ch)) ch = getc();
		while(isalpha(ch)) s[++len] = ch, ch = getc();
		return len;
	}
	inline void flush() { fwrite(obuf, 1, olen, stdout); olen = 0; }
	inline void putc(register char ch) { obuf[olen++] = ch; }
	template<class T>
	inline void write(register T x) {
		if(x < 0) obuf[olen++] = '-', x = -x;
		if(x > 9) write(x / 10);
		obuf[olen++] = x % 10 + 48;
	}
} using namespace IO;
const int N = 1e5 + 10, mod = 998244353;
int n, m, a[N];
int u[N], v[N], du[N];
bool vis[N];
vector<int> e[N];
int main() {
	n = read(), m = read();
	for(int i = 1; i <= n; i++)
		a[i] = read() % mod;
	for(int i = 1; i <= m; i++) {
		u[i] = read() + 1, v[i] = read() + 1;
		du[u[i]]++, du[v[i]]++;
	}
	for(int i = 1; i <= m; i++)
		if(make_pair(du[u[i]], u[i]) < make_pair(du[v[i]], v[i]))
			e[u[i]].push_back(v[i]);
		else e[v[i]].push_back(u[i]);
	long long ans = 0;
	for(int i = 1; i <= n; i++) {
		for(auto v : e[i])
			vis[v] = 1;
		for(auto v : e[i]) {
			for(auto w : e[v])
				if(i != v && v != w && i != w && vis[w])
					ans += 1ll * a[i] * a[v] % mod * a[w] % mod, ans %= mod;
		}
		for(auto v : e[i])
			vis[v] = 0;
	}
	cout << ans;
	return 0;
}