#include<bits/stdc++.h>
#define int long long
using namespace std;
const int N=1000000;
int p1,vt,z[N+5],pr[N+5];
long long x,v[N+5],f[2][N+5],s[N+5],g[N+5];
const signed mod=998244353;
long long fpow(long long a,int b){
    long long ans=1;
    while(b){
        if(b&1) ans=ans*a%mod; 
        a=a*a%mod;
        b>>=1;
    }
    return ans;
}
void dd(){
    p1=0;
    for(int i=2;i<=N;i++){
        if(!z[i]){
            pr[++p1]=i;
            s[p1]=p1;
        }
        for(int j=1;j<=p1&&i*pr[j]<=N;j++){
            z[i*pr[j]]=1;
            if(i%pr[j]==0) break;
        }
    }
}
void init(long long n){
    x=sqrt(n)+1;
    vt=0;
    for(long long l=1,r;l<=n;l=r+1){
        r=n/(n/l);
        v[++vt]=n/l;
        if(n/l<=x) f[0][n/l]=vt;
        else f[1][l]=vt;
        long long t=n/l;
        g[vt]=t-1;
    }
    long long w;
    for(int i=1;i<=p1;i++){
        w=1ll*pr[i]*pr[i];
        long long t;
        for(int j=1;j<=vt&&w<=v[j];j++){
            t=v[j]/pr[i];
            if(t<=x) t=f[0][t];
            else t=f[1][n/t];
            g[j]-=g[t]-s[i-1];
        }
    }
    
}
long long S(long long p,int q,long long n){
    if(pr[q]>=p) return 0;
    long long td=(p<=x?f[0][p]:f[1][n/p]);
    long long re=g[td]-s[q];
    return re;
}
long long calc(long long p,long long n){
	if(p<=1) return 0;
    return S(p,0,n);
}
long long ans(long long n,long long _n){
    if(n<=2) return 1;
    long long cnt=calc(n,_n)-calc(n/2,_n)+1;
    long long res=n-cnt;
    if(res==0){
        return fpow(n%mod,cnt-2);
    }else{
        return fpow(n%mod,cnt-1)*(res%mod)%mod;
    }
}
long long solve(long long n){
    long long a=1;
    for(int l=1;l<=n;++l){
    	long long r(n/(n/l));
    	a=a*fpow(ans(n/l,n),r-l+1)%mod;
    	l=r;
    }
    return a;
}
signed main()
{
    long long n;
    scanf("%lld",&n);
    dd();
    init(n);
    if(n==1){
        printf("1\n");
    }
    else{
        printf("%lld\n",solve(n));
    }
    return 0;
}