Определите, может ли кирпич, имеющий форму прямоугольного параллелепипеда с ребрами a, b, c, пройти через прямоугольное отверстие со сторонами х и y (при этом стороны параллелепипеда параллельны сторонам отверстия считать, что при равенстве размеров отверстия и кирпича, кирпич не может пройти в отверстие.

Ребра a,b,c - это ширина высота и длина (x,y,z) в данном случае не имеет значение длина кирпича, тоесть если 2 параметра x,y у кирпича меньше либо равно x,y прямоугольного отверстия то пройдет.

Порядок неубывания,значит порядок возрастания. 2828 не может,так как если мы введём максимальное число 99999,то будет 2727 2512 не может, так как порядок возрастания,а 25> 12 2518 не может, так как порядок возрастания,а 25> 18 2524 не может, так как порядок возрастания,а 25> 24 2425 может(число 78997) 1825 может(число 72979)1225  может(число 12979) 123 не может,существует 2 варианта записи этого числа: 1)12 и 3,но такого быть не может,так как 12> 3 2)1 и 23,но такого быть не может,так как чтобы получилось 23 должны быть числа больше 7,а 1 получается слева,значит среднее число максимум 1,но нам оно не подходит итак,подходят 2425,1825,1225 ответ: 3

Var     i,j,p: integer;     a: array[1..20]of integer; begin writeln('исходный массив: '); for i: =1 to 20 do   begin   a[i]: =random(20);   write(a[i],' ');   end; writeln; i: =1; while i< 21 do   begin   j: =i;   while j< 21 do     begin     if a[i]< a[j] then       begin       p: =a[i];       a[i]: =a[j];       a[j]: =p;       end;     j: =j+2;     end;   i: =i+2;   end; i: =2; while i< 21 do   begin   j: =i;   while j< 21 do     begin     if a[i]> a[j] then       begin       p: =a[i];       a[i]: =a[j];       a[j]: =p;       end;     j: =j+2;     end;   i: =i+2;   end; writeln('измененный массив: '); for i: =1 to 20 do write(a[i],' ') end.