var 
  //s:ansistring;
  i,count,s,g:longint;
begin
  for s:=1 to 9 do
    for g:=0 to s-1 do if (s+g) mod 2=0 then writeln(s,g);
end.
/**************************************************************
	Problem: 1711
	User: admin
	Language: Pascal
	Result: Runtime Error
****************************************************************/