#include <bits/stdc++.h>
using namespace std;
long long int gcd(long long int a, long long int b) {
  if (b == 0) return a;
  return gcd(b, a % b);
}
long long int lcm(long long int a, long long int b) {
  return a * b / gcd(a, b);
}
long long int fexp(long long int a, long long int b) {
  long long int ans = 1;
  while (b) {
    if (b & 1) ans = ans * a % 998244353;
    b /= 2;
    a = a * a % 998244353;
  }
  return ans;
}
long long int inverse(long long int a, long long int p) {
  return fexp(a, p - 2);
}
void ingraph(vector<vector<long long int> >& graph, long long int m) {
  long long int x, y;
  for (long long int i = 0; i < m; i++) {
    cin >> x >> y;
    x--, y--;
    graph[x].push_back(y);
    graph[y].push_back(x);
  }
}
long long int modify(long long int n) {
  long long int res = n;
  res %= 998244353;
  res += 998244353;
  res %= 998244353;
  return res;
}
vector<long long int> fact(200005);
long long int n, k;
void pre() {
  fact[0] = 1;
  for (long long int i = 1; i < 200005; i++) {
    fact[i] = fact[i - 1] * i;
    fact[i] %= 998244353;
  }
}
long long int f(long long int n, long long int r) {
  long long int res = fact[n];
  long long int den = fact[n - r] * fact[r];
  den %= 998244353;
  den = inverse(den, 998244353);
  res *= den;
  res %= 998244353;
  return res;
}
long long int getnop() {
  long long int tmp = n - k;
  long long int val = n - k;
  long long int res = 0;
  long long int i = 0;
  while (tmp) {
    long long int cur = f(val, i) * fexp(tmp, n);
    cur %= 998244353;
    if (i & 1)
      res -= cur;
    else
      res += cur;
    res = modify(res);
    i++, tmp--;
  }
  return res;
}
int main() {
  ios::sync_with_stdio(0);
  cin.tie(0);
  cout.tie(0);
  long long int t;
  pre();
  t = 1;
  while (t--) {
    cin >> n >> k;
    if (k >= n) {
      cout << 0;
      return 0;
    }
    if (k == 0) {
      cout << fact[n];
      return 0;
    }
    long long int nop = getnop();
    nop *= f(n, n - k);
    nop = modify(nop);
    nop *= 2;
    nop %= 998244353;
    cout << nop;
  }
}
