记录编号	74971	评测结果	ATTTTTTTTW
题目名称	eins	最终得分	10
用户昵称	bhiaibogf	是否通过	未通过
代码语言	Pascal	运行时间	8.011 s
提交时间	2013-10-26 19:43:30	内存使用	0.17 MiB

program eins;
const
	infile='eins.in';
	outfile='eins.out';
var
	t:longint;
	n,p:qword;

function Fibonacci(n,p:qword):qword;
var a,b,c:qword;
begin
	a:=0;b:=1;
	while n>1 do begin
		c:=(a+b) mod p;
		a:=b;b:=c;
		dec(n);{ writeln(c); }
	end;
	exit(c);
end;
	
begin
	assign(input,infile);reset(input);
	assign(output,outfile);rewrite(output);
	readln(t);
	while t>0 do begin
		readln(n,p);
		writeln(Fibonacci(n,p));
		dec(t);
	end;
	close(input);close(output);
end.