记录编号	65171	评测结果	AAAAAAAAAA
题目名称	[暑假培训2012] 打乒乓球	最终得分	100
用户昵称	铁策	是否通过	通过
代码语言	Pascal	运行时间	0.040 s
提交时间	2013-07-25 17:01:37	内存使用	0.15 MiB

program P933;
var
t,n,i,j,x,y,sum:longint;
function dist(a,b,c,d:longint):real;
begin
dist:=sqrt(sqr(c-a)+sqr(d-b));
end;
begin
assign(input,'table2.in');
reset(input);
assign(output,'table2.out');
rewrite(output);
readln(t);
for i:=1 to t do
begin
  readln(n);
  for j:=1 to n do
  begin
    readln(x,y);
    if dist(x,y,30,30)<20 then inc(sum,1);
    if dist(x,y,100,30)<10 then inc(sum,2);
    if dist(x,y,170,30)<5 then inc(sum,3);
  end;
  writeln(sum);
  sum:=0;
end;
end.