#include using namespace std; template vector operator-(vector a) { for (auto&& e : a) e = -e; return a; } template vector& operator+=(vector& l, const vector& r) { l.resize(max(l.size(), r.size())); for (int i = 0; i < (int)r.size(); ++i) l[i] += r[i]; return l; } template vector operator+(vector l, const vector& r) { return l += r; } template vector& operator-=(vector& l, const vector& r) { l.resize(max(l.size(), r.size())); for (int i = 0; i < (int)r.size(); ++i) l[i] -= r[i]; return l; } template vector operator-(vector l, const vector& r) { return l -= r; } template vector operator*(const vector& l, const vector& r) { if (l.empty() or r.empty()) return {}; vector res(l.size() + r.size() - 1); for (int i = 0; i < (int)l.size(); ++i) for (int j = 0; j < (int)r.size(); ++j) res[i + j] += l[i] * r[j]; return res; } template vector& operator*=(vector& l, const vector& r) { return l = l * r; } template vector inverse(const vector& a) { assert(not a.empty() and not (a[0] == 0)); vector b{1 / a[0]}; while (b.size() < a.size()) { vector x(begin(a), begin(a) + min(a.size(), 2 * b.size())); x *= b * b; b.resize(2 * b.size()); for (auto i = b.size() / 2; i < min(x.size(), b.size()); ++i) b[i] = -x[i]; } b.resize(a.size()); return b; } template vector operator/(vector l, vector r) { if (l.size() < r.size()) return {}; reverse(begin(l), end(l)), reverse(begin(r), end(r)); int n = l.size() - r.size() + 1; l.resize(n), r.resize(n); l *= inverse(r); return {rend(l) - n, rend(l)}; } template vector& operator/=(vector& l, const vector& r) { return l = l / r; } template vector operator%(vector l, const vector& r) { if (l.size() < r.size()) return l; l -= l / r * r; l.resize(r.size() - 1); return l; } template vector& operator%=(vector& l, const vector& r) { return l = l % r; } template vector derivative(const vector& a) { vector res(max((int)a.size() - 1, 0)); for (int i = 0; i < (int)res.size(); ++i) res[i] = (i + 1) * a[i + 1]; return res; } template vector primitive(const vector& a) { vector res(a.size() + 1); for (int i = 1; i < (int)res.size(); ++i) res[i] = a[i - 1] / i; return res; } template vector logarithm(const vector& a) { assert(not a.empty() and a[0] == 1); auto res = primitive(derivative(a) * inverse(a)); res.resize(a.size()); return res; } template vector exponent(const vector& a) { assert(a.empty() or a[0] == 0); vector b{1}; while (b.size() < a.size()) { vector x(begin(a), begin(a) + min(a.size(), 2 * b.size())); x[0] += 1; b.resize(2 * b.size()); x -= logarithm(b); x *= {begin(b), begin(b) + b.size() / 2}; for (auto i = b.size() / 2; i < min(x.size(), b.size()); ++i) b[i] = x[i]; } b.resize(a.size()); return b; } template > T power(T a, long long n, F op = multiplies(), T e = 1) { assert(n >= 0); T res = e; while (n) { if (n & 1) res = op(res, a); if (n >>= 1) a = op(a, a); } return res; } template struct Modular { using M = Modular; unsigned v; Modular(long long a = 0) : v((a %= Mod) < 0 ? a + Mod : a) {} M operator-() const { return M() -= *this; } M& operator+=(M r) { if ((v += r.v) >= Mod) v -= Mod; return *this; } M& operator-=(M r) { if ((v += Mod - r.v) >= Mod) v -= Mod; return *this; } M& operator*=(M r) { v = (uint64_t)v * r.v % Mod; return *this; } M& operator/=(M r) { return *this *= power(r, Mod - 2); } friend M operator+(M l, M r) { return l += r; } friend M operator-(M l, M r) { return l -= r; } friend M operator*(M l, M r) { return l *= r; } friend M operator/(M l, M r) { return l /= r; } friend bool operator==(M l, M r) { return l.v == r.v; } }; template void ntt(vector>& a, bool inverse) { static vector> dt(30), idt(30); if (dt[0] == 0) { Modular root = 2; while (power(root, (Mod - 1) / 2) == 1) root += 1; for (int i = 0; i < 30; ++i) dt[i] = -power(root, (Mod - 1) >> (i + 2)), idt[i] = 1 / dt[i]; } int n = a.size(); assert((n & (n - 1)) == 0); if (not inverse) { for (int w = n; w >>= 1; ) { Modular t = 1; for (int s = 0, k = 0; s < n; s += 2 * w) { for (int i = s, j = s + w; i < s + w; ++i, ++j) { auto x = a[i], y = a[j] * t; if (x.v >= Mod) x.v -= Mod; a[i].v = x.v + y.v, a[j].v = x.v + (Mod - y.v); } t *= dt[__builtin_ctz(++k)]; } } } else { for (int w = 1; w < n; w *= 2) { Modular t = 1; for (int s = 0, k = 0; s < n; s += 2 * w) { for (int i = s, j = s + w; i < s + w; ++i, ++j) { auto x = a[i], y = a[j]; a[i] = x + y, a[j].v = x.v + (Mod - y.v), a[j] *= t; } t *= idt[__builtin_ctz(++k)]; } } } } template vector> operator*(vector> l, vector> r) { if (l.empty() or r.empty()) return {}; int n = l.size(), m = r.size(), sz = 1 << __lg(2 * (n + m - 1) - 1); if (min(n, m) < 30) { vector res(n + m- 1); for (int i = 0; i < n; ++i) for (int j = 0; j < m; ++j) res[i + j] += (l[i] * r[j]).v; return {begin(res), end(res)}; } bool eq = l == r; l.resize(sz), ntt(l, false); if (eq) r = l; else r.resize(sz), ntt(r, false); for (int i = 0; i < sz; ++i) l[i] *= r[i]; ntt(l, true), l.resize(n + m - 1); auto isz = 1 / Modular(sz); for (auto&& e : l) e *= isz; return l; } constexpr long long mod = 1012924417; using Mint = Modular; vector fact, inv_fact; void prepare_fact(int n) { fact.resize(n + 1), inv_fact.resize(n + 1); fact[0] = 1; for (int i = 1; i <= n; ++i) { fact[i] = i * fact[i - 1]; } inv_fact[n] = 1 / fact[n]; for (int i = n; i; --i) { inv_fact[i - 1] = i * inv_fact[i]; } } Mint binom(int n, int k) { if (k < 0 or k > n) return 0; return fact[n] * inv_fact[k] * inv_fact[n - k]; } int main() { cin.tie(nullptr); ios::sync_with_stdio(false); int n; cin >> n; prepare_fact(n + 2); // 2 * (1 + tan(X / 2)) / (1 - tan(X / 2)) vector b(n + 2); // B_n / n! for (int i = 0; i <= n + 1; ++i) { b[i] = inv_fact[i + 1]; } b = inverse(b); vector tanx2(n + 1); for (int i = 1; 2 * i - 1 <= n; ++i) { tanx2[2 * i - 1] = power(-1, i - 1) * 2 * (power(Mint(2), 2 * i) - 1) * b[2 * i]; } auto f = vector{2} * (vector{1} + tanx2) * inverse(vector{1} - tanx2); auto res = f[n] * fact[n]; cout << res.v << '\n'; }