#define MD 998244353
ll@n,d[1d4],o=Divisor(n,d);
Mint z;
map<ll,Mint>s;
s[1]=1;
while(!s.empty()){
	decltype(s)t;
	for(auto i:s){
		rep[d](j,o){
			if(i.first%j){
				t[lcm(i.first,j)]+=i.second;
			}
		}
	}
	s=t;
	z+=s[n];
	s.erase(n);
}
wt(z);