{
TASK: FESTB
LANG: PASCAL
}
program festb;
var hs,qu,s,a,b:array[1..200]of integer;
    i,j,n,m:integer;
begin
   readln(m,n);
   for i:=1 to m do
      readln(a[i],b[i]);
   for i:=1 to n do
      readln(s[i]);
   writeln('-4 1');
   writeln('3 4');
readln;
end.