{
TASK:darts
LANG:PASCAL
}
var
 a,b:real;
 c,cnt:byte;
 z:array[1..20]of byte;
function ev(a,b:real):integer;
var
 c,e:real;
 d:integer;
 t:boolean;
begin
 t:=false;
 if(a<=0.5)and(a>=-0.5)and(b<=0.5)and(b>=-0.5) then begin ev:=50; exit; end;
 if(a<=1)and(a>=-1)and(b<=1)and(b>=-1) then begin ev:=25; exit; end;
 if a<>0 then
 begin
  c:=a*0.314;
  c:=b/c;
  if c<0 then begin  c:=c*-1; t:=true; end;
  d:=0;
  while(c>1) do begin c:=c-1; inc(d);  end;
  d:=d+1;
  if d=20 then d:=1;
 end
 else begin if b<-1 then d:=6;  if b>1 then d:=16; end;
 if a>0 then d:=d+10;
 if t=true then d:=d-22;
 if d<0 then d:=d*-1;
 if d>20 then d:=d-20;
{ if(a<=10)and(a>=9.5)and(b<=10)and(b>=9.5) then begin ev:=3*z[d]; exit; end;
 if(a<=20)and(a>=19.5)and(b<=20)and(b>=19.5) then begin ev:=3*z[d]; exit; end;
 if(a>=-10)and(a<=-9.5)and(b>=-10)and(b<=-9.5) then begin ev:=3*z[d]; exit; end;
 if(a>=-20)and(a<=-19.5)and(b>=-20)and(b<=-19.5) then begin ev:=3*z[d]; exit; end;  }
 if(sqrt(a*a+b*b)>=9.5)and(sqrt(a*a+b*b)<=10) then begin ev:=z[d]*3; exit; end;
 if(sqrt(a*a+b*b)>=19.5)and(sqrt(a*a+b*b)<=20) then begin ev:=z[d]*2; exit; end;
 ev:=z[d];
end;
begin
 z[1]:=20;
 z[2]:=1;
 z[3]:=18;
 z[4]:=4;
 z[5]:=13;
 z[6]:=6;
 z[7]:=10;
 z[8]:=15;
 z[9]:=2;
 z[10]:=17;
 z[11]:=3;
 z[12]:=19;
 z[13]:=7;
 z[14]:=16;
 z[15]:=8;
 z[16]:=11;
 z[17]:=14;
 z[18]:=9;
 z[19]:=12;
 z[20]:=5;
 cnt:=0;
 for c:=1 to 3 do begin
                   read(a,b);
                   a:=24-a;
                   b:=24-b;

                  { a:=a*-1;
                   b:=b*-1;}
                {  writeln(a:0:3,' ',b:0:3);      }
                   {writeln(a:0:3,' ',b:0:3); }
                   if(a>20)or(a<-20)or(b>20)or(b<-20) then begin end
                                                       else begin
                                                            cnt:=cnt+ev(b,a);
                                                           end;
                  end;
 writeln(cnt);
end.