Problem: Notice: unusual memory limit!

After the war, destroyed cities in the neutral zone were restored. And children went back to school.

The war changed the world, as well as education. In those hard days, a new math concept was created.

As we all know, logarithm function can be described as: $$$ log(p_1^{a_1}p_2^{a_2}...p_k^{a_2}) = a_1 log p_1 + a_2 log p_2 + ... + a_k log p_k  Where p_1^{a_1}p_2^{a_2}...p_k^{a_2}$$$ is the prime factorization of a integer. A problem is that the function uses itself in the definition. That is why it is hard to calculate.

So, the mathematicians from the neutral zone invented this: $$$ exlog_f(p_1^{a_1}p_2^{a_2}...p_k^{a_2}) = a_1 f(p_1) + a_2 f(p_2) + ... + a_k f(p_k) $$$

Notice that exlog_f(1) is always equal to 0.

This concept for any function f was too hard for children. So teachers told them that f can only be a polynomial of degree no more than 3 in daily uses (i.e., f(x) = Ax^3+Bx^2+Cx+D).

"Class is over! Don't forget to do your homework!" Here it is: $$$ ∑_{i=1}^n exlog_f(i) $$$

Help children to do their homework. Since the value can be very big, you need to find the answer modulo 2^{32}.

Input

The only line contains five integers n, A, B, C, and D (1 ≤ n ≤ 3 ⋅ 10^8, 0 ≤ A,B,C,D ≤ 10^6).

Output

Print the answer modulo 2^{32}.

Examples

Input

12 0 0 1 0


Output

63


Input

4 1 2 3 4


Output

136

Note

In the first sample:

exlog_f(1) = 0

exlog_f(2) = 2

exlog_f(3) = 3

exlog_f(4) = 2 + 2 = 4

exlog_f(5) = 5

exlog_f(6) = 2 + 3 = 5

exlog_f(7) = 7

exlog_f(8) = 2 + 2 + 2 = 6

exlog_f(9) = 3 + 3 = 6

exlog_f(10) = 2 + 5 = 7

exlog_f(11) = 11

exlog_f(12) = 2 + 2 + 3 = 7

 ∑_{i=1}^{12} exlog_f(i)=63 

In the second sample:

exlog_f(1) = 0

exlog_f(2) = (1 × 2^3 + 2 × 2^2 + 3 × 2 + 4) = 26

exlog_f(3) = (1 × 3^3 + 2 × 3^2 + 3 × 3 + 4) = 58

exlog_f(4) = 2 × exlog_f(2) = 52

 ∑_{i=1}^4 exlog_f(i)=0+26+58+52=136 

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int MAXN = 20005;
int vis[MAXN], id1[MAXN], id2[MAXN], val[MAXN * 2], prime[MAXN];
int n, A, B, C, D, m, cp, cn;
unsigned g[MAXN * 2], g1[MAXN * 2], f[MAXN], sum[MAXN], ans;
unsigned S(int i, int j) {
  if (prime[j] > i) return 0;
  int cnt = g[i <= m ? id1[i] : id2[n / i]] - j + 1;
  ans += g1[i <= m ? id1[i] : id2[n / i]] - sum[j - 1];
  for (int k = j; k <= cp && prime[k] * prime[k] <= i; k++) {
    int p = prime[k], mul = p;
    for (int e = 1; i / p >= mul; mul *= p, ++e) {
      int t = S(i / mul, k + 1);
      ans += f[k] * (e + 1) + f[k] * e * t;
      cnt += t + 1;
    }
  }
  return cnt;
}
int main() {
  scanf("%d%d%d%d%d", &n, &A, &B, &C, &D);
  m = (int)sqrt(n) + 1;
  for (int i = 2; i <= m; i++)
    if (!vis[i]) {
      prime[++cp] = i;
      for (int j = i + i; j <= m; j += i) vis[j] = 1;
    }
  for (int i = 1; i <= n; i++) {
    int d = n / i, j = n / d;
    if (d <= m)
      id1[d] = ++cn;
    else
      id2[n / d] = ++cn;
    val[cn] = d;
    g[cn] = d - 1;
    i = j;
  }
  for (int i = 1; i <= cp; i++) {
    sum[i] = sum[i - 1] + 1, f[i] = 1;
    int p = prime[i];
    for (int j = 1; p * p <= val[j]; j++) {
      int t = val[j] / p;
      g[j] -= g[t <= m ? id1[t] : id2[n / t]] - i + 1;
    }
  }
  for (int i = 1; i <= cn; i++) g1[i] = g[i];
  ans = 0;
  S(n, 1);
  unsigned res = ans * D;
  for (int i = 1; i <= cn; i++) {
    long long t = val[i];
    g1[i] = t * (t + 1) / 2 - 1;
  }
  for (int i = 1; i <= cp; i++) {
    unsigned p = prime[i];
    sum[i] = sum[i - 1] + p, f[i] = p;
    for (int j = 1; p * p <= val[j]; j++) {
      int t = val[j] / p;
      g1[j] -= (g1[t <= m ? id1[t] : id2[n / t]] - sum[i - 1]) * f[i];
    }
  }
  ans = 0;
  S(n, 1);
  res += ans * C;
  for (int i = 1; i <= cn; i++) {
    long long t = val[i];
    t = t * (t + 1) / 2;
    if (t % 3 == 0)
      t = t / 3 * (2 * val[i] + 1);
    else
      t = (2 * val[i] + 1) / 3 * t;
    g1[i] = t - 1;
  }
  for (int i = 1; i <= cp; i++) {
    unsigned p = prime[i];
    sum[i] = sum[i - 1] + p * p, f[i] = p * p;
    for (int j = 1; p * p <= val[j]; j++) {
      int t = val[j] / p;
      g1[j] -= (g1[t <= m ? id1[t] : id2[n / t]] - sum[i - 1]) * f[i];
    }
  }
  ans = 0;
  S(n, 1);
  res += ans * B;
  for (int i = 1; i <= cn; i++) {
    long long t = val[i];
    t = t * (t + 1) / 2;
    g1[i] = t * t - 1;
  }
  for (int i = 1; i <= cp; i++) {
    unsigned p = prime[i];
    sum[i] = sum[i - 1] + p * p * p, f[i] = p * p * p;
    for (int j = 1; p * p <= val[j]; j++) {
      int t = val[j] / p;
      g1[j] -= (g1[t <= m ? id1[t] : id2[n / t]] - sum[i - 1]) * f[i];
    }
  }
  ans = 0;
  S(n, 1);
  res += ans * A;
  printf("%u\n", res);
  return 0;
}