#include using namespace std; using ll =long long; #define all(v) v.begin(),v.end() #define rep(i,a,b) for(int i=a;i=b;i--) ll INF=2e18; const ll mod=998244353; class mint { long long x; public: mint(long long x=0) : x((x%mod+mod)%mod) {} mint operator-() const { return mint(-x); } mint& operator+=(const mint& a) { if ((x += a.x) >= mod) x -= mod; return *this; } mint& operator-=(const mint& a) { if ((x += mod-a.x) >= mod) x -= mod; return *this; } mint& operator*=(const mint& a) { (x *= a.x) %= mod; return *this; } mint operator+(const mint& a) const { mint res(*this); return res+=a; } mint operator-(const mint& a) const { mint res(*this); return res-=a; } mint operator*(const mint& a) const { mint res(*this); return res*=a; } mint pow(ll t) const { if (!t) return 1; mint a = pow(t>>1); a *= a; if (t&1) a *= *this; return a; } // for prime mod mint inv() const { return pow(mod-2); } mint& operator/=(const mint& a) { return (*this) *= a.inv(); } mint operator/(const mint& a) const { mint res(*this); return res/=a; } friend ostream& operator<<(ostream& os, const mint& m){ os << m.x; return os; } }; mint mod_pow(ll x,ll n,ll mod) { mint res=1; while(n>0) { if(n&1) { res=res*x; } x=x*x%mod; n>>=1; } return res; } int main() { ios::sync_with_stdio(false); cin.tie(0); ll N;cin>>N; vector> vec(4,vector (0)); for(ll i=0;i>c; ll a;cin>>a; if(c=='U') vec[0].push_back(a); else if(c=='F') vec[1].push_back(a); else if(c=='W') vec[2].push_back(a); else vec[3].push_back(a); } vector note(300000+100); note[0]=0; note[1]=1; for(ll i=2;i<300000+100;i++) { note[i]=note[i-1]*(N-1); note[i]+=mod_pow(N-2,i-1,mod); } mint next=0; ll s=0; for(auto x:vec[3]) s+=x; next=mod_pow(N-1,s,mod)*(ll)vec[3].size(); for(ll i=2;i>=0;i--) { mint count=0; ll s=0; for(auto x:vec[i]) s+=x; for(ll j=0;j<(ll)vec[i].size();j++) { ll a=vec[i][j]; count+=next*note[a]*mod_pow(N-1,s-a,mod); } next=count; } cout<