#include #pragma GCC optimize("Ofast") using namespace std; using std::cout; using std::cin; using std::endl; using ll=long long; using ld=long double; ll ILL=2167167167167167167; const int INF=2100000000; const ll mod=998244353; #define rep(i,a) for (ll i=0;i using _pq = priority_queue, greater>; template ll LB(vector &v,T a){return lower_bound(v.begin(),v.end(),a)-v.begin();} template ll UB(vector &v,T a){return upper_bound(v.begin(),v.end(),a)-v.begin();} template bool chmin(T &a,const T &b){if(a>b){a=b;return 1;}else return 0;} template bool chmax(T &a,const 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;});} void yneos(bool a){if(a) cout<<"Yes\n"; else cout<<"No\n";} template void vec_out(vector &p){for(int i=0;i<(int)(p.size());i++){if(i) cout<<" ";cout< T min(vector &a){assert(!a.empty());T ans=a[0];for(auto &x:a) chmin(ans,x);return ans;} template T max(vector &a){assert(!a.empty());T ans=a[0];for(auto &x:a) chmax(ans,x);return ans;} template T sum(vector &a){assert(!a.empty());T ans=a[0]-a[0];for(auto &x:a) ans+=x;return ans;} void solve(); // oddloop int main() { ios::sync_with_stdio(false); cin.tie(nullptr); int t=1; //cin>>t; rep(i,t) solve(); } void solve(){ ll N; cin>>N; vector fact(N+1,1); rep(i,N) fact[i+1]=(fact[i]*2ll)%mod; string S,T; cin>>S>>T; if(S.size()>T.size()) swap(S,T); int L=0; while(L<(int)S.size()&&S[L]==T[L]) L++; ll ans=0; auto f=[&](int dan)->ll{ return ((fact[N]-fact[N-dan])*(fact[N-dan]-1))%mod; }; for(int i=1;i p,q; if(L==(int)S.size()){ p.push_back(fact[N]-fact[N-L]); for(int i=L+1;i<(int)(T.size());i++){ p.push_back(fact[N-i]); } p.push_back(fact[N+1-(int)(T.size())]-1); }else{ p.push_back(fact[N]-fact[N+1-L]+1); for(int i=L+1;i<(int)(S.size());i++){ p.push_back(fact[N-i]); } p.push_back(fact[N+1-(int)(S.size())]-1); for(int i=L+1;i<(int)(T.size());i++){ q.push_back(fact[N-i]); } p.push_back(fact[N+1-(int)(T.size())]-1); reverse(all(q)); for(auto x:q) p.push_back(x); } ans=(ans*2ll)%mod; ll len=p.size(); ll tmp=0,diff=0; rep(i,len){ tmp=(tmp+min(i,len-i)*p[i])%mod; if(i!=0&&i<=len/2) diff-=p[i]; if(i==0||(len+1)/2