#include <bits/stdc++.h>
//#include <boost/multiprecision/cpp_int.hpp>
#pragma GCC optimize("O3")
#define REP(i,n) for(int i=0;i<n;i++)
#define REPP(i,n) for(int i=1;i<=n;i++)
#define ALL(obj) (obj).begin(), (obj).end()
#define EPS (1e-9)
#define INF (1e17)
#define PI (acos(-1))
//const double PI = acos(-1);
//const double EPS = 1e-15;
//long long INF=(long long)1E17;
//#define i_7 (long long)(1e9+7)
#define i_7 998'244'353
long mod(long a){
    long long c=a%i_7;
    if(c>=0)return c;
    return c+i_7;
}
long long po(long a, long b){
    if(b==0){
        return 1;
    }
    
    long long z = po(a,b/2);
    z = mod(z*z);
    if(b%2!=0){
        z = mod(a*z);
    }
    return z;
}
using namespace std;
//using namespace boost::multiprecision;

bool prime_(int n){
  if(n==1){
    return false;
  }else if(n==2){
    return true;
  }else{
    for(int i=2;i<=sqrt(n);i++){
      if(n%i==0){
        return false;
      }
    }
    return true;
  }
}

long long gcd_(long long a, long long b){
  if(a<b){
    swap(a,b);
  }
  if(a%b==0){
    return b;
  }else{
    return gcd_(b,a%b);
  }
}
 
long long lcm_(long long x, long long y){
  return (x/gcd_(x,y))*y;
}

typedef P pair<long long, long long>;
map<P, long long> mp;
long long func(long long s, long long x){
  long long res = 0;
  if(s < 0 || x < 0){
    return 0;
  }
  if(s == 0 && x == 0){
    return 1;
  }
  if(s == 1 && x == 0){
    return 0;
  }
  if(s == 0 && x == 1){
    return 0;
  }
  if(mp[P(s,x)] < 0){
    res = 0LL - mp[P(s,x)];
    return res;
  }
  res += func(s/2, x/2);
  res = mod(res);
  res += func((s-1)/2, (x-1)/2);
  res = mod(res);
  res += func((s-2)/2, x/2);
  res = mod(res);
  mp[P(s,x)] = 0LL - res;
  return res;
}
int main(){
  
  long long n;
  cin>>n;
  long long ans = func(n,n);
  cout<<ans<<endl;
  return 0;
}
