#include<bits/stdc++.h>
#define ff first
#define ss second
#define pb push_back
typedef long long ll;
using namespace std;
typedef pair<int,int> pii;

const int mod=998244353;
inline int add(int x,int y){int ret=x+y;if(ret>=mod)ret-=mod;return ret;}
inline int sub(int x,int y){int ret=x-y;if(ret<0)ret+=mod;return ret;}
inline int mul(int x,int y){return ((ll)x*y)%mod;}
inline int step(int base,int pw){int ret=1;while(pw){if(pw&1)ret=mul(ret,base);base=mul(base,base);pw>>=1;}return ret;}
inline int invv(int x){return step(x,mod-2);}


const int maxn=1e6+10;
const int maxalp=26*2+10;

int n;
string s;
int a[maxn],pref[maxalp][maxn];
int get_num(char c){
    if(c>='a' && c<='z')return c-'a';
    if(c>='A' && c<='Z')return c-'A'+26;
    return c-'0'+52;
}

int dp[maxalp][4],cum[maxalp][maxalp][4];
int pcnt[maxalp],papcnt[maxalp];
void go(){

    int rez=0;

    int inv2=invv(2);
    for(int i=n;i>=1;i--){

        memset(dp,0,sizeof(dp));

        pcnt[a[i]]--;
        int sum=0;
        for(int j=0;j<maxalp;j++){
            papcnt[j]=mul(pcnt[j],mul(sub(pcnt[j],1),inv2));
            sum=add(sum,papcnt[j]);
        }

        for(int j=0;j<maxalp;j++){
            for(int k=0;k<=3;k++){

                if(a[i]==j)continue;

                if(k==0){
                    dp[j][k]=1;
                }
                else{
                    dp[j][k]=cum[j][a[i]][k-1];
                }

            }
        }

        ///printf("%d I\n",i);
        for(int j=0;j<maxalp;j++){

            int pom=i-1;
            pom-=pref[a[i]][i-1];
            pom-=pref[j][i-1];
            pom=mul(pom,mul(sub(pom,1),inv2));
            pom=sub(pom,sub(sum,add(papcnt[a[i]],papcnt[j]) )  );

            rez=add(rez,mul(pom,dp[j][3]));

            ///printf("%d %d | ",j,dp[j][3]);
        }
        ///printf("\n\n");

        for(int j=0;j<maxalp;j++){
            for(int k=0;k<=3;k++){
                cum[a[i]][j][k]=add(cum[a[i]][j][k],dp[j][k]);
            }
        }

    }

    printf("%d\n",rez);

}

int main(){

    ///freopen("test.txt","r",stdin);

    cin>>s;

    n=s.size();

    for(int i=1;i<=n;i++){
        a[i]=get_num(s[i-1]);
    }

    for(int i=0;i<maxalp;i++){
        for(int j=1;j<=n;j++){
            pref[i][j]=pref[i][j-1]+(a[j]==i);
        }
        pcnt[i]=pref[i][n];
    }

    go();

    return 0;
}