记录编号 251428 评测结果 AAAAAAAAAA
题目名称 [UVa 679]小球下落 最终得分 100
用户昵称 Gravatar这_不错 是否通过 通过
代码语言 Pascal 运行时间 0.010 s
提交时间 2016-04-17 20:17:12 内存使用 0.19 MiB
显示代码纯文本
program kahf;
	var j,k,n,m,d,t,i:longint;
begin
	assign(input,'fballs.in');reset(input);
	assign(output,'fballs.out');rewrite(output);
	readln(n);
	for j:=1 to n do
		begin
			readln(d,t);
			k:=1;
			for i:=1 to d-1 do
				begin	
					if(t mod 2<>0)then 
						begin
							k:=k*2;
							t:=(t+1)div 2;
						end
					else
						begin
							k:=k*2+1;
							t:=t div 2;
						end;
				end;
			writeln(k);
		end;
	readln(m);
	close(input);
	close(output);
end.