use proconio::input;

const MOD: usize = 998_244_353;
fn main() {
    input! {
        n: usize,
    }

    if n % 2 == 1 {
        println!("0");
        return;
    }

    // dp[i][j][t] := 先頭から i + j 個が、 (: i個, ): j個, 最後が ) であればt
    let mut dp = vec![vec![[0, 0]; n / 2 + 1]; n / 2 + 1];
    dp[0][0][0] = 1;
    for i in 0..=n / 2 {
        for j in 0..=n / 2 {
            if i < j || (i == 0 && j == 0) {
                continue;
            }
            dp[i][j][0] = if i > 0 {
                (dp[i - 1][j][0] + dp[i - 1][j][1]) % MOD
            } else {
                0
            };
            dp[i][j][1] = if j > 0 {
                (dp[i][j - 1][0] + dp[i][j - 1][1]) % MOD
            } else {
                0
            };
        }
    }

    let mut ans = 0;
    for i in 0..=n / 2 {
        for j in 0..=n / 2 {
            if i <= j {
                continue;
            }
            ans += dp[i][j][1] * (i - j) % MOD
                * (dp[n / 2 - j][n / 2 - i][0] + dp[n / 2 - j][n / 2 - i][1])
                % MOD;
        }
    }

    println!("{}", ans);
}