上课的时候总有一些同学和前后左右的人交头接耳，这是令小学班主任十分头疼的一件事情。不过，班主任小雪发现了一些有趣的现象，当同学们的座次确定下来之后，只有有限的D对同学上课时会交头接耳。同学们在教室中坐成了M行N列，坐在第i行第j列的同学的位置是（i，j），为了方便同学们进出，在教室中设置了K条横向的通道，L条纵向的通道。于是，聪明的小雪想到了一个办法，或许可以减少上课时学生交头接耳的问题：她打算重新摆放桌椅，改变同学们桌椅间通道的位置，因为如果一条通道隔开了两个会交头接耳的同学，那么他们就不会交头接耳了。

请你帮忙给小雪编写一个程序，给出最好的通道划分方案。在该方案下，上课时交头接耳的学生对数最少。

第一行，有5各用空格隔开的整数，分别是M，N，K，L，D（2<=N，M<=1000，0<=K<M，0<=L<N，D<=2000）。

接下来D行，每行有4个用空格隔开的整数，第i行的4个整数Xi，Yi，Pi，Qi，表示坐在位置(Xi,Yi)与(Pi,Qi)的两个同学会交头接耳（输入保证他们前后相邻或者左右相邻）。

输入数据保证最优方案的唯一性。

共两行。

第一行包含K个整数，a1a2……aK，表示第a1行和a1+1行之间、第a2行和第a2+1行之间、…、第aK行和第aK+1行之间要开辟通道，其中ai< ai+1，每两个整数之间用空格隔开（行尾没有空格）。

第二行包含L个整数，b1b2……bk，表示第b1列和b1+1列之间、第b2列和第b2+1列之间、…、第bL列和第bL+1列之间要开辟通道，其中bi< bi+1，每两个整数之间用空格隔开（行尾没有空格）。

4 5 1 2 3

4 2 4 3

2 3 3 3

2 5 2 4

2

2 4

题解：

贪心。

要想分的多，就得要每一次分都要分的多（预处理就行了），所以运用贪心思想，判断能分隔最多的前l行和前r列并输出。

var r,c,h,l,n,i,s,j,ans:longint;

    x1,x2,y1,y2,hang,lie:array[0..2001]of longint;

    vis,f:array[0..2001]of boolean;

function min(x,y:longint):longint;

 begin

  if x<y then exit(x);

  exit(y);

 end;

function max(x,y:longint):longint;

 begin

  if x>y then exit(x);

  exit(y);

 end;

begin

 readln(r,c,h,l,n);

 for i:=1 to n do

  begin

   read(x1[i],y1[i],x2[i],y2[i]);

   if x1[i]-x2[i]=0 then f[i]:=true;

  end;

 for i:=1 to n do

  if f[i] then inc(lie[min(y1[i],y2[i])])

          else inc(hang[min(x1[i],x2[i])]);

 for i:=1 to h do

  begin

   s:=0;

   for j:=1 to r do

    if (hang[j]>hang[s])and(vis[j]=false) then s:=j;

   vis[s]:=true;

   ans:=max(ans,s);

  end;

 for i:=1 to r do

  if vis[i] then

   begin

    write(i);

    if ans<>i then write(‘ ‘);

   end;

 fillchar(vis,sizeof(vis),false);

 writeln;

 ans:=0;

 for i:=1 to l do

  begin

   s:=0;

   for j:=1 to c do

    if (lie[j]>=lie[s])and(vis[j]=false) then s:=j;

   vis[s]:=true;

   ans:=max(ans,s);

  end;

 for i:=1 to c do

  if vis[i] then

   begin

    write(i);

    if ans<>i then write(‘ ‘);

   end;

end.