Blob Blame Raw
program boxandhole;

var
  a, b, c: integer;
  x, y: integer;
  pass: boolean;
  s: string;

begin
  Writeln('Enter box size (a, b, c):');
  Readln(a);
  Readln(b);
  Readln(c);

  Writeln('Enter hole size (x, y):');
  Readln(x);
  Readln(y);

  pass := false;
  if (a < x) and (b < y) then pass := true;
  if (b < x) and (c < y) then pass := true;
  if (c < x) and (a < y) then pass := true;

  if (b < x) and (a < y) then pass := true;
  if (c < x) and (b < y) then pass := true;
  if (a < x) and (c < y) then pass := true;

  { or coding conditions in other way:
  pass := ((a < x) and (b < y))
       or ((b < x) and (c < y))
       or ((c < x) and (a < y))
       or ((b < x) and (a < y))
       or ((c < x) and (b < y))
       or ((a < x) and (c < y));
  }

  if pass then begin
    writeln('Will pass trought');
  end else begin
    writeln('Box too large');
  end;

  readln(s);
end.