#include <bits/stdc++.h>
using namespace std;
using ll=long long;
#include <atcoder/modint>
using mint=atcoder::modint998244353;
ll isqrt(ll x){
	ll s=sqrt(x);
	while((s+1)*(s+1)<=x)s++;
	while(s*s>x)s--;
	return s;
}
using bint=__int128_t;
int main(){
	ll n;
	cin>>n;
	auto sum=[](ll l,ll r)->mint{
		auto g=[](mint x)->mint{
			return x*x*(x*x-1)/2;
		};
		auto gsum=[](mint x)->mint{
			return (x-1)*x*(x+1)*(x+2)*(2*x+1)/20;
		};
		auto prefix_sum=[g,gsum](ll r)->mint{
			if(r==0)return 0;
			mint mr=r;
			mint sr=isqrt(r);
			return (sr-1)*g(sr)-gsum(sr-1)+sr*(mr*(mr+1)/2-sr*sr*(sr*sr-1)/2);
		};
		///cout<<prefix_sum(r).val()<<" "<<prefix_sum(l-1).val()<<endl;
		return prefix_sum(r)-prefix_sum(l-1);
	};
	vector<pair<ll,int>> evs;
	vector<ll> v(60,1);
	mint cur=1;
	for(int i=3;i<60;i++){
		for(ll j=2;j<=1000000;j++){
			bint t=1;
			for(int k=0;k<i;k++){
				t*=j;
				if(t>n)break;
			}
			if(t<=n)evs.push_back(make_pair(t,i));
		}
	}
	ranges::sort(evs);
	ll l=1;
	mint ans=0;
	for(auto[r,i]:evs){
		ans+=sum(l,r-1)*cur;
		//cout<<l<<" "<<r<<" "<<cur.val()<<endl;
		//cout<<sum(l,r-1).val()<<endl;
		cur/=v[i];
		v[i]++;
		cur*=v[i];
		l=r;
	}
	if(l<=n)ans+=sum(l,n)*cur;
	//cout<<l<<" "<<n+1<<" "<<cur.val()<<endl;
	//cout<<sum(l,n).val()<<endl;
	mint naive=0;
	
	cout<<ans.val()<<endl;
}