#include <iostream>
#include <stack>
#include <cstdio>
#include <cstdlib>
#include <queue>
#include <algorithm>
#include <list>
using namespace std;
long long f(int n,int m){
if(m<n-m)m=n-m;
long long ans=1;
for(int i=m+1;i<=n;i++)ans*=i;
for(int i=1;i<=n-m;i++)ans/=i;
return ans;
}
int main(){
int c;
cin>>c;
while (c--) {
int n,m;
cin>>n>>m;
// 错排分析:
// 1.假如前n-1个新郎已经形成了错排,那么第n个新郎只需要将自己的新娘与前面的n-1个新娘交换即可
// 2.假如前n-1个人不是都错排,那么要想使第n个人过来与其中一个交换后实现错排的话就必须满足两个条件:
//
// 1.那n-1个人中只有一个人选到了自己的新娘,也就是说有n-2个人都已经错排了。
//
// 2.第n个人必须和那个选到自己新娘的人去交换,但那个选到自己新娘的人可以是n-1个人中的任意一个。这种情况有(n-1)*f[n-2]种可能。
//
// 其他情况都不能满足n个人错排。
long long a[25];
a[0]=0;
a[1]=0;
a[2]=1;
for (int i=3; i<=20; i++) {
a[i]=(a[i-1]+a[i-2])*(i-1);
}
cout<<f(n,m)*a[m]<<endl;
}
return 0;
}