#include <cmath>
#include <iostream>
#include <map>
#include <vector>
using namespace std;
using u64 = uint64_t;

vector<bool> sieve(int x) {
  vector<bool> is_prime(x+1, true);
  is_prime[0] = is_prime[1] = false;
  for(int p=2; p*p<=x; ++p) {
    if(is_prime[p]) {
      for(int q=p*p; q<=x; q+=p) {
        is_prime[q] = false;
      }
    }
  }
  return is_prime;
}

constexpr u64 O = 17,
              M = (1ULL << 51) * 4011 + 1,
              M2 = M - 2,
              R2 = static_cast<u64>(-__uint128_t(M) % M);

constexpr inline u64 MR(__uint128_t t) {
  u64 r = u64((__uint128_t(u64(t) * M2) * M + t) >> 64);
  return r < M ? r : r - M;
}

constexpr inline u64 init(__uint128_t x) {
  return MR(x * R2);
}

constexpr inline u64 mod_mul(__uint128_t x, u64 y) {
  return MR(x * y);
}

map<pair<u64, u64>, u64> cache;

inline u64 mod_pow(u64 a, u64 n) {
  auto key = make_pair(a, n);
  if(cache.count(key)) { return cache[key]; }
  u64 res = init(1);
  for(; n; n>>=1) {
    if(n & 1) { res = mod_mul(res, a); }
    a = mod_mul(a, a);
  }
  return cache[key] = res;
}

void myfmt(vector<u64> &a, bool inv) {
  size_t n = a.size();
  if(n == 1) { return; }
  size_t m = n / 2;
  vector<u64> a0(m), a1(m);
  for(size_t i=0, j=0; i<m; ++i) {
    a0[i] = a[j++];
    a1[i] = a[j++];
  }
  myfmt(a0, inv);
  myfmt(a1, inv);
  u64 z = mod_pow(init(O), (M-1)/n);
  if(inv) { z = mod_pow(z, M2); }
  u64 pz = init(1);
  for(size_t i=0, k=0; k<m; ++i, ++k) {
    a[k] = a0[i] + mod_mul(a1[i], pz);
    if(a[k] >= M) { a[k] -= M; }
    pz = mod_mul(pz, z);
  }
  for(size_t i=0, k=m; k<n; ++i, ++k) {
    a[k] = a0[i] + mod_mul(a1[i], pz);
    if(a[k] >= M) { a[k] -= M; }
    pz = mod_mul(pz, z);
  }
}

void fmt(vector<u64> &a) {
  myfmt(a, false);
}

void ifmt(vector<u64> &a) {
  myfmt(a, true);
  size_t n = a.size();
  u64 inv = mod_pow(init(n), M2);
  for(size_t i=0; i<n; ++i) {
    a[i] = mod_mul(a[i], inv);
  }
}

vector<u64> convol2(vector<u64> &a) {
  size_t n = 1;
  while(n < a.size() + a.size()) { n <<= 1; }
  a.resize(n);
  fmt(a);
  vector<u64> c(n);
  for(size_t i=0; i<n; ++i) {
    c[i] = mod_mul(a[i], a[i]);
  }
  ifmt(c);
  return c;
}

int main(void) {
  int N; scanf("%d", &N);
  constexpr u64 init1 = init(1);
  vector<bool> is_prime = sieve(N);
  vector<u64> a(N+1);
  for(int p=2; p<=N; ++p) {
    if(is_prime[p]) { a[p] = init1; }
  }
  vector<u64> c = convol2(a);
  size_t cn = c.size();
  u64 res = 0;
  for(int p=2; p<=N && p*p<=cn; ++p) {
    if(is_prime[p]) {
      res += MR(c[p*p]);
    }
  }
  printf("%lu\n", res);
  return 0;
}