const n = 7;
var a:array[1..10000] of integer;
    Lo : array [1..10000] of Boolean;
var m,i,j,k,b,c,d:integer;
begin
  readln(m);
  k:=1;
  for i:= 1 to m do begin
    read(b);readln(c);
    a[i]:=(c mod b);Lo[i]:=True;
  end;
  d := 0;
  for i := 1 to m do
   if (Lo[i]) and (a[i]<>0) then
    begin
     d := d + 1;
     for j := i to m do
        Lo[j] := (a[j] <> a[i]) and Lo[j];
    end;
  writeln(d);
  writeln(a);
end.