{* Задача 135 *}

Unit ZADACH135;
Interface
Implementation
Begin
 writeln('Сост. прог. для опред. пройдёт ли кирпич с рёбрами a, b, c в прямоуг. отверстие со сторонами x, y. ');
End.

Program pas13546;

Uses zadach135.pas; {* Эту строку можно удалить *}
Uses crt; {* Подключаем внешние файлы *}
Var {* Необходимые переменные *}
  a : longint;
  b : longint;
  c : longint;
  x : longint;
  y : longint;
  f : longint;
Begin
  clrscr; {* Очищаем экран *}
  write('ребро a=');
  readln(a);
  write('ребро b=');
  readln(b);
  write('ребро c=');
  readln(c);
  write('сторона x=');
  readln(x);
  write('сторона y=');
  readln(y);
  f := 0;
  If ((x > b)And(y > c))Or((x > c)And(y > b)) Then
    f := 1;
  If ((x > b)And(y > a))Or((x > a)And(y > b)) Then
    f := 1;
  If ((x > a)And(y > c))Or((x > c)And(y > a)) Then
    f := 1;
  If f = 1 Then
    write('пройдёт')
  Else write('не пройдёт');
    readln; {* Ждем нажатия Enter *}
End.