#include <cstdio>
#include <cstdlib>
#include <cmath>
#include <vector>
#include <list>
#include <map>
#include <iostream>
#include <queue>
#include <stack>
#include <algorithm>
#include <deque>
#include <fstream>
#include <functional>
#include <cctype>
#include <unordered_set>
#include <unordered_map>
#include <string>

using namespace std;

#define pb push_back
#define mp make_pair
#define rep(i,n) for(int i = 0; i < (n); i++)
#define repr(i,b,e) for(int i = (b); i <= (e); i++)

#define pr(x) do{cerr << (#x) << " = " << (x) << endl;}while(0)
#define pri(x,i) do{cerr << (#x) << "[" << i << "] = " << (x[i]) << endl;}while(0)

namespace std {
	template<class S, class T> pair<S, T> operator + (const pair<S, T> &a, const pair<S, T> &b) {return mp<S, T>(a.first + b.first, a.second + b.second);}
	template<class S, class T> pair<S, T> operator - (const pair<S, T> &a, const pair<S, T> &b) {return mp<S, T>(a.first - b.first, a.second - b.second);}
	template<class S, class T> pair<S, T>& operator += (pair<S, T> &a, const pair<S, T> &other) {return a = a + other;}
	template<class S, class T> pair<S, T>& operator -= (pair<S, T> &a, const pair<S, T> &other) {return a = a - other;}
	template<class S, class T> ostream& operator << (ostream& ost, pair<S, T> p) {ost << "(" << p.first << ", " << p.second << ")";return ost;}
	template<class T> ostream& print_iterable_container(ostream& ost, T& container) {
		for (auto&& iter = begin(container); iter != end(container); ++iter) ost << (iter == begin(container) ? " [ " : ", ") << (*iter);
		return ost << " ]";
	}
#	define APPLY_PRINT_ITERABLE_CONTAINER(container_type)\
	template<class T> ostream& operator << (ostream& ost, container_type<T>& container) {\
		return print_iterable_container(ost, container);\
	}
	APPLY_PRINT_ITERABLE_CONTAINER(vector);
	APPLY_PRINT_ITERABLE_CONTAINER(list);
	APPLY_PRINT_ITERABLE_CONTAINER(deque);
}

template<class T> inline bool CHMAX(T &l,const T &r){return l<r?l=r,1:0;}
template<class T> inline bool CHMIN(T &l,const T &r){return l>r?l=r,1:0;}

using ll = long long;
using pii = pair<int, int>;
using pll = pair<ll, ll>;
using vi = vector<int>;
using vll = vector<ll>;
using vvi = vector<vi>;
using vvll = vector<vll>;
using vpii = vector<pii>;
using vpll = vector<pll>;

using ld = long double;

template<class T> using VV = vector<vector<T> >;
template<class T> using maxPQ = priority_queue<T>;
template<class T> using minPQ = priority_queue<T, vector<T>, greater<T> >;
template<class T, class U> using uomap = unordered_map<T, U>;
template<class T> using uoset = unordered_set<T>;

const ll INF = 1001001001;
const ll INFll = (ll)INF * INF;
const ll MOD = 998244353;
const ld EPS = 1e-15;

//function<void(int,int)> tensi_no_3p=[&](int v,int d){
//};

int N, S;
vi A;
vll ways(100000),  ways2(100000);

int main() {
	ios_base::sync_with_stdio(false);
	cin >> N;
	A.resize(N);
	rep(i, N) {
		cin >> A[i];
		S += A[i];
	}
	pr(S);
	ways[0] = 1;
	ways2[0] = 1;
	rep(i, N) for (int k = 99999; k >= 0; k--) {
		ways[k] = (2 * ways[k] + (k >= A[i] ? ways[k - A[i]] : 0)) % MOD;
		ways2[k] += (k >= A[i] ? ways2[k - A[i]] : 0) % MOD;
	}
	rep(i, 10) pri(ways, i);

	int T = (S - 1) / 2;
	ll ans = 0;
	repr(i, 0, T) ans = (ans + ways[i]) % MOD;
	ll dame = 0;
	repr(i, T + 1, 99999) dame = (dame + ways[i]) % MOD;
	pr(ans);
	pr(dame);
	ll dame2 = 0;
	if (S % 2 == 0) dame2 = ways2[T + 1];
	pr(dame2);
	ll fa = ans - dame - dame + dame2 * 3;
	while (fa < 0) fa += MOD;
	cout << (fa + MOD) % MOD << endl;
	return 0;
}


Measured memory_bytes: 1792