package q3xx;
import java.io.PrintWriter;
import java.util.Scanner;

public class Q371_4T {
	static int I = 3400000;
	static int M = 1000000007;
	static int d(char[] a,int l){int r=0,j=l+4;for(;j>=l;j--)r=r*93+a[j]-(a[j]+1880)/58;return r;}
	static char[] enigma = "!    CLc!-|k$k-d{e$#OZL0 @x7?$`e4/&1j50)i?(C,'?jW-<0FN'#*7}$5sMq HFc%#ZWcR!9ZM^'c{u|'5.ev*['x]&S^>Z'dhrT%1{-k%2KLX gZ=E-Np6e u*O.({>=H&U3#T'`'Fa!.J=2*^M2O-vQ+]-VT.,&!2($&4kSc$T#^y#PB}j*]r-l*]DSa$M 'W*4/2<&r[;*)ii|n(c'BS*RBRj(E/Q~*o]8--3)>X)VRm=&Fo39)CaTt *<S6)Lrg5 !L&I*w;8A*0QX%)(9A&.|Gkv- =h7)VJTx)aDqJ(>^/h(TC%(';3iS)4|of'+XSB'QK.%+>O4}*@@ Q-#>b#&-`PS!dhn@'E e)-f>GA Lrlo-VEw6#c|G1$gOrx%@O;s NF2>%$8I:)=)jz*Eus<-!WtU!_vvC$K-*}- (u>!6^]K%S;H{*7wa+.E.T8,9kR=*yh6K #|^/,^Q54+=u5K$?DRO#GRE!) Sn]%CR'+%wJ6-%^o{u%)o2L%Bw&;+o<fD,`O],&(h%q&juPO'T>fo&2D0h&:D&D*&<u,*lFw*#tNo& AJNq(t@:K,b_)|+}.Yn+CJT_(4(V(''C<.,HxS% Sj5y*TKPD$`{tw$F(tB+W@9`-zC^_*h=4v'Dk#_-9Zn7.G+6U!:<os&nin;(tR<~-=pCv*YW@1%Cpff  u,/+P~/Z)};u` z8^y-mWHS-( L7+hp`D'X+8a%-0l.-{ {f$^_JK#%ub6+y.[=!%6Y_(E5~w+3DPu-<#rO)H)=h }01X$=}mN%k[{'-jhxy';#{N#2XI^&j$.^+qYs0+w2}:&o&Xk-D^Fy%[/yx&>a_u)!V^ %x'X&+PU17$+**t(R?lT#Y<dz!6%0[$a}P$#*sdV,s<-|'`a]!(Y,c^ Hsp< Rb4+$UW+x*=ty#$_y1V$l5P%+4:AH(PD+a(D-UG 02h?$eT@O!v:)T(^,B{&H|PL+!i'p!xY/|%7 Rr)K&7$(KTUv'lrb*),|~c){Nx>-3+Cb ,h*p,6 .[ pZYP%J>Qn,`%'Q&ubw%$QV%',7tJi!:U5$+QZB9!?/Na%)%Sk#_G G !VF~!$yya)#=b{,-]vR,IX0R-~tUH,z@jK,VLO>!9y;s&>y ?'./PR+Buxe)lf6l+/4Em+(`AW'^$2t!^Y%c&ry3d,DyZc,puBB)8Q>z yzI['*^` ,OTf6(m*cj,E}{r'-KS;#@zt|,w#Zm!Z;9I#1h[F!#(*@$mf7A)e96!,dvk#'7tpV$-1Eu)dW&G%tk~T)H0xD**wMc-([@%&bRM%'|6Aw+tM{8)SR_0+<o-q+/&&Z-PETJ'paqL,jhH|+p.U[)1&vc,Wyk0$_=6g#Nydk)Wduo q'<b(=}z^ *O{% dxdr#[ffc-WOB;!w/OL*d5=@!Us4g%mCrl 3p**&+hTx-)QH%%<NfY%K*U0&u*#8+[pk ,8dhh#s-q6)l,[2#fH~t(".toCharArray();
	
	static long invl(long a) {
		long b = M;
		long p = 1, q = 0;
		while (b > 0) {
			long c = a / b;
			long d;
			d = a;
			a = b;
			b = d % b;
			d = p;
			p = q;
			q = d - c * q;
		}
		return p < 0 ? p + M : p;
	}
	
	static long f(int n)
	{
		int h = n%I,i;
		long mul;
		if(h < I/2){
			for(i=n/I*I+1,mul=d(enigma,n/I*5);i<=n;mul=mul*i%M,i++);
			return mul;
		}else{
			for(i=n/I*I+I,mul=1;i>n;mul=mul*i%M,i--);
			return invl(mul)*d(enigma, n/I*5+5)%M;
		}
	}
	
	public static void main(String[] args) throws Exception
	{
		Scanner in = new Scanner(System.in);
		PrintWriter out = new PrintWriter(System.out);
		for(int T = Integer.parseInt(in.next());T >= 1;T--){
			String C = in.next(), P = in.next();
			if(P.length() >= 11){
				out.println(0);
				continue;
			}
			long pl = Long.parseLong(P);
			
			if(pl >= M){
				out.println(0);
				continue;
			}
			
			long cl = 0;
			if(C.length() >= 12){
				for(char x : C.toCharArray())cl = (cl*10+x-'0')%M;
			}else{
				cl = Long.parseLong(C);
				if(cl-(2*pl-1)+1 <= 0){
					out.println(0);
					continue;
				}
			}
			
			long sup = (cl-(pl-1)+M)%M;
			long inf = (cl-(2*pl-1)+M+M)%M;
			out.println(sup<inf?0:f((int)sup)*invl(f((int)inf))%M);
		}
	}
}