{
TASK:lab101
LANG:PASCAL
}

var
  t: array[0..11,0..11] of Byte;
  mp1,mp2: array[1..100] of Byte;
  x,y,a,b,k: array[1..32] of Byte;
  vis: array[1..10,1..10] of Boolean;
  n,m,p,i,j,ind: Byte;
  x1,y1,x2,y2,x3,y3: Byte;
  min,ans: Byte;
  fl1,fl2,fl3: Boolean;

begin
  writeln(1)
end.