#include <bits/stdc++.h>
using namespace std;
using ll=long long;
int n;
char s[6000010];
const int N=6000010;
int ch[N][10];
int fail[N],nm[N],len[N];
const int mod=998244353;
int cnt,tot;
int get_pre(char s[],int ct,int wei){
    while(wei-len[ct]-1<=0||s[wei-len[ct]-1]!=s[wei])   ct=fail[ct];
    return ct;
}
void palid_tr(char s[]){
    cnt=tot=1;
    fail[0]=1;fail[1]=0;len[0]=0;len[1]=-1;
    fill(ch[0],ch[0]+10,0);fill(ch[1],ch[1]+10,0);
    int sz=2*n;
    for(int i=1;i<=sz;i++){
        int ct=get_pre(s,tot,i);
        if(!ch[ct][s[i]-'0']){
            cnt++;
            fill(ch[cnt],ch[cnt]+10,0);
            nm[cnt]=0;
            len[cnt]=len[ct]+2;
            fail[cnt]=ch[get_pre(s,fail[ct],i)][s[i]-'0'];
            ch[ct][s[i]-'0']=cnt;
        }
        tot=ch[ct][s[i]-'0'];
        if(i>n)    nm[tot]++;
    }
}
int du[N];
void solve(){
    cin>>n;
    cin>>s+1;
    for(int i=1;i<=n;i++)    s[n+i]=s[i];
    s[2*n+1]='\0';
    palid_tr(s);
    for(int i=2;i<=cnt;i++){
        if(fail[i]>1) du[fail[i]]++;
    }
    queue<int> qe;
    ll ans=0;
    for(int i=0;i<=cnt;i++){
        if(!du[i])  qe.push(i);
    }
    while(!qe.empty()){
        int t=qe.front();qe.pop();
        if(len[t]<=n)ans=(ans+1ll*nm[t]*nm[t]%mod*len[t]%mod)%mod;
        du[fail[t]]--;
        nm[fail[t]]+=nm[t];
		if(fail[t]>=2&&!du[fail[t]])	qe.push(fail[t]);
    }
    cout<<ans<<'\n';
}
int main(){
    ios::sync_with_stdio(false),cin.tie(0);
    int _=1;
    // cin>>_;
    while(_--)  solve();
    return 0;
}