uses interp_unit;//置顶
  x:=array(5,1,19,8);
  y:=array(2,3,1,7);
  chckxy(x,y);
  return x | y;