#include <bits/stdc++.h>
using namespace std;
const int N = 2005, P = 998244353;
int n, k, l, ans, fac[N], ifac[N], inv[N << 1], f[N << 1];
inline int Pow(long long x, int y = P - 2) {
  int ans = 1;
  for (; y; y >>= 1, x = x * x % P)
    if (y & 1) ans = ans * x % P;
  return ans;
}
inline int calc() {
  int now = 0;
  for (int i = 0; i <= n * 2; ++i)
    now = (now + (long long)f[i] * inv[i + 1]) % P;
  return now;
}
int main() {
  scanf("%d%d%d", &n, &k, &l);
  inv[1] = 1;
  for (int i = 2; i <= n * 2 + 1; ++i)
    inv[i] = (long long)(P - P / i) * inv[P % i] % P;
  fac[0] = 1;
  for (int i = 1; i <= n; ++i) fac[i] = (long long)fac[i - 1] * i % P;
  ifac[n] = Pow(fac[n]);
  for (int i = n; i; --i) ifac[i - 1] = (long long)ifac[i] * i % P;
  f[0] = 1;
  for (int i = 1; i <= n; ++i) {
    for (int j = 2 * n; j > 1; --j)
      f[j] = ((P - 2ll) * f[j - 2] + 2ll * f[j - 1]) % P;
    f[1] = (2ll * f[0]) % P;
    f[0] = 0;
  }
  for (int i = n; i >= k; --i) {
    ans =
        (ans + (long long)fac[n] * ifac[i] % P * ifac[n - i] % P * calc()) % P;
    memmove(f, f + 1, (n * 2 + 1) << 2);
    for (int j = 0; j <= n * 2; ++j) f[j] = f[j] * (P + 1ll) / 2 % P;
    for (int j = 1; j <= n * 2; ++j) (f[j] += f[j - 1]) %= P;
    f[n * 2] = f[n * 2 - 1] = 0;
    for (int j = 2 * n; j > 1; --j)
      f[j] = (2ll * f[j - 2] + (P - 2ll) * f[j - 1] + f[j]) % P;
    f[1] = ((P - 2ll) * f[0] + f[1]) % P;
  }
  return printf("%lld", (long long)ans * l % P), 0;
}
