type punct = record
x,y,z:integer;
end;
var v:array[1..200] of punct;
    g,f:text;
    j,p,i,n:integer;

function dist(a,b,c,d:integer):real;
var w:real;
begin

dist:=sqrt((a-b)*(a-b)+(c-d)*(c-d));

end;

begin
p:=1;
assign(f,'cerc.in');
reset(f);
readln(f,n);
for i:=1 to n do
readln(f,v[i].x,v[i].y,v[i].z);

close(f);
for i:=1 to n do
for j:=n-1 downto 2 do
if (dist(v[i].x,v[i].y,v[j].x,v[j].y) < v[i].z+v[j].z) and i<>j then
p:=p+2

else
p:=p+1;


assign(g,'cerc.out');
rewrite(g);
writeln(g,p);
close(g);
end.