Имеется прямоугольное отверстие со сторонами a и b и кирпич с рёбрами x, y z. требуется составить условие прохождения кирпича в отверстие. ( программный код нужно писать в паскале)

Коробки (время: 1 сек. память: 16 мб сложность: 19%) на столе лежат коробка размера a1 × b1 × c1 и коробка размера a2 × b2 × c2. выясните можно ли одну из этих коробок положить в другую, если разрешены повороты коробок вокруг любого ребра на угол 90 градусов. входные данные первая строка входного файла содержит три целых числа a1, b1 и c1. вторая строка входного файла содержит три целых числа a2, b2 и c2. все числа положительны и не превосходят 1000. выходные данные если коробки одинаковы, выведите "boxes are equal". если первая коробка может быть положена во вторую, выведите "the first box is smaller than the second one". если вторая коробка может быть положена в первую, выведите "the first box is larger than the second one". иначе, выведите "boxes are incomparable" program gt; label 1; var a,b: array[1..1000]of longint; a1,b1,c1,a2,b2,c2,p,l,n,i,j: longint; begin read(a1,b1,c1,a2,b2,c2); a[1]: =a1; a[2]: =b1; a[3]: =c1; b[1]: =a2; b[2]: =b2; b[3]: =c2; for i: =1 to 2 do begin for j: =1 to 3-i do begin p: =a[j]; l: =a[j+1]; if a[j]> a[j+1] then begin a[j]: =l; a[j+1]: =p; end; end; end; for i: =1 to 2 do begin for j: =1 to 3-i do begin p: =b[j]; l: =b[j+1]; if b[j]> b[j+1] then begin b[j]: =l; b[j+1]: =p; end; end; end; if(a[1]=b[1])and(a[2]=b[2])and(a[3]=b[3])then begin writeln('boxes are equal'); goto 1; end; if((a[1]< =b[1])and(a[2]< b[2])and(a[3]< =b[3]))or ((a[1]< b[1])and(a[2]< =b[2])and(a[3]< =b[3]))or ((a[1]< =b[1])and(a[2]< =b[2])and(a[3]< b[3]))then begin writeln('the first box is smaller than the second one'); goto 1; end; if((a[1]> =b[1])and(a[2]> b[2])and(a[3]> =b[3]))or ((a[1]> =b[1])and(a[2]> =b[2])and(a[3]> b[3]))or ((a[1]> b[1])and(a[2]> =b[2])and(a[3]> =b[3]))then begin writeln('the first box is larger than the second one'); goto 1; end; writeln('boxes are incomparable'); 1: end.

Что мы знаем про число x? то, что оно делится на 18 и 54. значит, что оно делится на их множители, но особым способом, который я сейчас объясню. итак, число а делиться на число в, если в в есть все множители, которые есть в а, причем в том же количестве. это понятно. теперь возьмем наш случай. 18=2*3*3, 54=2*3*3*3. это значит, что число х делиться на 2 и на 3. и более не на какие простые числа, теперь попробуем собрать максимальное число. заметим, что число 18 нам вообще не понадобиться, так как оно является делителем 54. значит, это число 54. докажем это. заметим, что любое число представимо в виде простых чисел. отсюда следует, что x=2*3*3*3*m1*m2**mn. заметим, что m вообще не может быть и x=54. простые числа не представляются в виде других простых чисел, даже если взять их все. значит, x только так и представимо, как я показал ранее. значит, мы можем утверждать только о известных множителях, иначе можно нарваться на такой случай, когда их нет. таким образом мы доказали, что это число 54.

Общий вид цикла  для (этот цикл ещё называют цикл с переменной)       нц  для  i от i 1  до  i2       | тело цикла (последовательность команд)       кц    здесь  i   – имя величины целого типа,  i 1,  i 2 – произвольные целые числа или выражения с целыми значениями. тело цикла последовательно выполняется для  i   =  i 1,  i   =  i 1 + 1,  i1 + 2, …i   =  i2.   правила алгоритмического языка допускают любых целых  i 1,  i 2. в частности,  i 2 может быть меньше  i 1. этот случай не считается ошибочным – просто тело цикла не будет выполнено ни разу, а компьютер сразу перейдет к выполнению команд, записанных после  кц.