#pragma GCC optimize("Ofast")
#pragma GCC target("avx2")

#define rd_init() char*rp=({char*mmap();mmap(0l,1l<<25,1,2,0,0ll);})
#define rd() ({int _v=0,_c;while(_c=*rp++-48,_c>=0)_v=_v*10+_c;_v;})

#define WTHI(v) {unsigned _z=v,_n=0;ulong _d=0;while(++_n,_d=_d<<8|0x30|_z%10,_z/=10);*(ulong*)wp=_d;wp+=_n;}
#define WTLO(v) {unsigned _z=v,_n=8;ulong _d=0;while(_d=_d<<8|0x30|_z%10,_z/=10,--_n);*(ulong*)wp=_d;wp+=8;}
#define wt(v) if(v>=100000000){WTHI(v/100000000);WTLO(v);}else{WTHI(v);}
#define aas(x) ({unsigned _r=x;_r+(_r<MD?0:MD);})
#define MD 998244353

typedef unsigned long ulong;

static const unsigned t10[]={10,100,10000,100000000,346563789,246310186,888327925,509930427,480388543,344436,843324442,770612957,135021217,56147513,702052458,823499382,269498164,1127308,58265495,578627211,311282151,904490625,371975324,122371506,155543970,301496519,220050301,658891113,480750826,852127815,737081821,148579152};

static inline
unsigned p10(int a){
	unsigned r=1;
	for(int i=0;a;a>>=1,++i){
		if(a&1){
			r=(ulong)r*t10[i]%MD;
		}
	}
	return r;
}

char wbuf[1<<25];

int main(){
	char*wp=wbuf;
	rd_init();
	int t=rd();
	while(t--){
		unsigned n=rd();
		unsigned m=rd();
		n%=m*2;
		unsigned a;
		if(n<m){
			a=p10(n)-1;
		}else{
			a=aas(p10(m)-p10(n-m));
		}
		wt(a);
		*wp++='\n';
	}
	write(1,wbuf,wp-wbuf);
	_exit(0);
}