#include<iostream>
#include<cmath>
using std::cin,std::cout;
int const mod=998244353;
int pow(int x,int y){
	int res=1;
	while(y){
		if(y&1) res=1ll*res*x%mod;
		x=1ll*x*x%mod,y>>=1;
	}
	return res;
}
int f0[400010],t,m;
long long n,f1[400010];
auto divide=[](long long N,long long d)->int{return double(N)/d;};
inline long long get(long long x){
	return x<=m?f0[x]:f1[divide(n,x)];
}
int main(){
	cin.tie(nullptr)->sync_with_stdio(false);
	cin>>n;
	m=std::sqrt(n);
	for(int i=1;i<=m;i++){
		f0[i]=i;
		f1[i]=(n/i);
	}
	for(int i=2;i<=m;i++)if(f0[i]!=f0[i-1]){
		int x=f0[i-1];
		long long r=1ll*i*i;
		int u=std::min(1ll*m,n/r),uu=std::min(u,divide(m,i));
		for(int j=1;j<=uu;j++) f1[j]=f1[j]-f1[i*j]+x;
		long long t=n/i;
		for(int j=uu+1;j<=u;j++) f1[j]=f1[j]-f0[divide(t,j)]+x;
		for(int j=m;j>=r;j--) f0[j]=f0[j]-f0[divide(j,i)]+x;
	}
	int ans=1;
	for(long long l=1,r;l<=n;l=r+1){
		r=n/(n/l);
		long long u=n/l;
		if(u==1) break;
		long long k=get(u)-get(u/2);
		int f=1ll*pow(int(u%mod),int(k%(mod-2)))*((u-k-1)%mod)%mod;
		if(u==2) f=1;
		if(u==3) f=3;
		ans=1ll*ans*pow(f,int((r-l+1)%(mod-2)))%mod;
	}
	cout<<ans<<'\n';
	return 0;
}