Заданы размеры А, В прямоугольного отверстия и размеры Х, Y, Z кирпича. Определите, пройдет ли кирпич через отверстие. Помогите пожалуйста. Нужна через паскаль.
Var a, b, x, y, z: real; begin readln(a, b, x, y, z); if ((a < x) and (b < y)) or ((a < x) and (b < z)) or ((a < z) and (b < y)) then writeln(true) else writeln(false); end.