program test(output);
var i,j,k:integer;
begin
  i:=0; j:=1; k:=2;
  if (i=k) or (j=1) or (i<>1) then k:=0;
  if ((i=k) or (1=1)) and not((0<>1) or (j=k)) then k:=0;
  if ((i=k) or (1=1)) and((0<>1) or (j=k)) then k:=0;
  if ((i=k) or (1=1)) or ((0<>1) or (j=k)) then k:=0;
  if ((i=k) or (1=1)) or (0<>1) then k:=0;
  if ((i=k) or (1=1)) or (0<>1) then k:=0;
  while (i<j) do i:=j;
  repeat i:=i+1 until i>=j;
end.
