#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_skip() while(*rp++>=48)
#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);}

typedef unsigned long ulong;

char wbuf[1<<25];

int main(){
	rd_init();
	char*wp=wbuf;
	for(int t=rd();t--;){
		char*n=rp;
		rd_skip();
		char*e=rp-1;
		unsigned m=rd();
		unsigned m2=m*2;
		ulong a=0;
		while(n+8<e){
			unsigned d=0;
			d=d*10+(*n++-'0');
			d=d*10+(*n++-'0');
			d=d*10+(*n++-'0');
			d=d*10+(*n++-'0');
			d=d*10+(*n++-'0');
			d=d*10+(*n++-'0');
			d=d*10+(*n++-'0');
			d=d*10+(*n++-'0');
			a=(a*100000000+d)%m2;
		}
		while(n<e){
			a=a*10+(*n++-'0');
		}
		a%=m2;
		a=a*(a+1)/2%m;
		wt(a);
		*wp++='\n';
	}
	write(1,wbuf,wp-wbuf);
	_exit(0);
}