#include<bits/stdc++.h>
using namespace std;
const int mod=998244353;
char c[1010000];int n;
int T[2001000][3];
void ad(int &x,int y){x+=y;if(x>=mod)x-=mod;}
const int N=7e7;
int ls[N],cn,rs[N],su[N];
void up(int &o,int x,int z,int l=0,int r=n*2){
    if(!o)o=++cn;ad(su[o],z);if(l==r)return;
    int mi=(l+r)>>1;
    if(x<=mi)up(ls[o],x,z,l,mi);
    else up(rs[o],x,z,mi+1,r);
}
int ask(int o,int x,int l=0,int r=n*2){
    if(!o)return 0;
    if(l==r)return 0;
    int mi=(l+r)>>1;
    if(x<=mi)return ask(ls[o],x,l,mi);
    int ks=ask(rs[o],x,mi+1,r)+su[ls[o]];
    if(ks>=mod)ks-=mod;return ks;
}
int main(){
    scanf("%s",c+1);n=strlen(c+1);
    int x=0,y=0,z=0;
    for(int i=0;i<=n;i++){
        if(i)x+=(c[i]=='I'),y+=(c[i]=='P'),z+=(c[i]=='C');
        int fn=0;
        if(i==0)fn=1;
        else{
            ad(fn,ask(T[x-y+n][0],z-x+n));
            ad(fn,ask(T[y-z+n][1],x-y+n));
            ad(fn,ask(T[z-x+n][2],y-z+n));
        }
        if(i==n){printf("%d",fn);return 0;}
        up(T[x-y+n][0],z-x+n,fn);
        up(T[y-z+n][1],x-y+n,fn);
        up(T[z-x+n][2],y-z+n,fn);
    }
    return 0;
}