program fuckyouonce;
var
  k,i,j,n,x,y,x0,y0,xt,yt,ans:longint;
  a:array[-2500..2500,-2500..2500] of boolean;
  fin,fout:text;
begin
  assign(fin,'loverfinding.in');
  assign(fout,'loverfinding.out');
  reset(fin);
  rewrite(fout);
  fillchar(a,sizeof(a),false);
  readln(fin,n,x0,y0,xt,yt);
  a[x0,y0]:=true;
  ans:=1;
  for k:=1 to n do
    begin
      readln(fin,x,y);
      x0:=x0+x;
      y0:=y0+y;
      if (not a[x0,y0]) then
        begin
          a[x0,y0]:=true;
          ans:=ans+1;
          if (x0=xt) and (y0=yt) then
            begin
              writeln(fout,ans);
              close(fin);
              close(fout);
              halt;
            end;
        end;
    end;
  writeln(fout,'SingleDogMZX');
  close(fin);
  close(fout);
end.