#include using namespace std; using ll=long long; const ll ILL=2167167167167167167; const int INF=2100000000; #define rep(i,a,b) for (int i=(int)(a);i<(int)(b);i++) #define all(p) p.begin(),p.end() template using _pq = priority_queue, greater>; template int LB(vector &v,T a){return lower_bound(v.begin(),v.end(),a)-v.begin();} template int UB(vector &v,T a){return upper_bound(v.begin(),v.end(),a)-v.begin();} template bool chmin(T &a,T b){if(b bool chmax(T &a,T b){if(a void So(vector &v) {sort(v.begin(),v.end());} template void Sore(vector &v) {sort(v.begin(),v.end(),[](T x,T y){return x>y;});} bool yneos(bool a,bool upp=false){if(a){cout<<(upp?"YES\n":"Yes\n");}else{cout<<(upp?"NO\n":"No\n");}return a;} template void vec_out(vector &p,int ty=0){ if(ty==2){cout<<'{';for(int i=0;i<(int)p.size();i++){if(i){cout<<",";}cout<<'"'< T vec_min(vector &a){assert(!a.empty());T ans=a[0];for(auto &x:a) chmin(ans,x);return ans;} template T vec_max(vector &a){assert(!a.empty());T ans=a[0];for(auto &x:a) chmax(ans,x);return ans;} template T vec_sum(vector &a){T ans=T(0);for(auto &x:a) ans+=x;return ans;} int pop_count(long long a){int res=0;while(a){res+=(a&1),a>>=1;}return res;} template T square(T a){return a * a;} #include using mint = atcoder::modint998244353; void solve(); // POP'N ROLL MUSIC / TOMOO int main() { ios::sync_with_stdio(false); cin.tie(nullptr); int t = 1; // cin >> t; rep(i, 0, t) solve(); } void solve(){ int N, K; cin >> N >> K; vector to(N + 1); rep(i, 1, N + 1) to[i] = (mint(i)).pow(K); vector dp1(N + 1), dp2(N + 1); dp1[0] = 1; vector> G(N); int C = 0; int M = 0; G[0] = {0}; rep(i, 0, N){ int a; cin >> a; if (abs(a) == 2) C++; if (a < 0) M ^= 1; if (M == 0 && C % 3 == 0 && C != 0) G[C / 3].push_back(i + 1); } if (M != 0 || C % 3 != 0){ cout << "0\n"; return; } G.resize(C / 3 + 1); rep(i, 0, C / 3){ if (G[i + 1].empty()){ cout << "0\n"; return; } int l = G[i][0]; int r = G[i + 1].back() + 1; vector A(r - l), B(r - l); // vec_out(G[i]); // vec_out(G[i + 1]); // cout << l << " " << r << endl; mint sum1 = 0, sum2 = 0; for (auto x : G[i]) A[x - l] = dp1[x], sum1 += dp1[x], sum2 += dp2[x]; rep(j, 0, r - l) B[j] = to[j]; A = atcoder::convolution(A, B); for (auto x : G[i + 1]) dp2[x] = A[x - l] + sum2, dp1[x] = sum1; } cout << dp2[N].val() << "\n"; }