Упаковка
(время: 1 сек. память: 16 мб сложность: 26%)
в одну транспортную компанию поступил заказ на перевозку двух ящиков из одного города в другой. для перевозки ящики решено было упаковать в специальный контейнер.
ящики и контейнер имеют вид прямоугольных параллелепипедов. длина, ширина и высота первого ящика – l1, w1 и h1, соответствующие размеры второго ящика – l2, w2 и h2. контейнер имеет длину, ширину и высоту lc, wc и hc.
поскольку ящики содержат хрупкое оборудование, после упаковки в контейнер каждый из них должен остаться в строго вертикальном положении. таким образом, ящики можно разместить рядом или один на другом. для надежного закрепления в контейнере стороны ящиков должны быть параллельны его сторонам. иначе говоря, если исходно ящики были расположены так, что все их стороны параллельны соответствующим сторонам контейнера, то каждый из них разрешается перемещать и поворачивать относительно вертикальной оси на угол, кратный 90 градусам.
разумеется, после упаковки оба ящика должны полностью находиться внутри контейнера и не должны пересекаться.
выясните, можно ли поместить ящики в контейнер, с выполнением указанных условий.
входные данные
первая строка входного файла input.txt содержит l1, w1 и h1, вторая – l2, w2 и h2, третья – lc, wc и hc. все размеры – целые положительные числа, не превышающие 1000. числа в строках разделены пробелами.
выходные данные
в выходной файл output.txt выведите yes, если ящики можно упаковать в контейнер и no в противном случае.
решите в паскале или в с++
свойства компьютера заменяет мозг человека вот професор был создал комп ты подошёл написал вопрос и ответ высветился эта главная цель компа обеспечет отдых мозгу человека и телу к пример хочеж узнать кто такой тигр не трать силы на поездку шёлк пик и готово 3д фильм тигр а есть 5д токо эта дорого подключаеш к телу костюм и на голову шлем и все ты засыпаеш костюм изменить сон ты сказал компьютершику хочу сон про то что я тигр вуале во сне тигр таймер проснулся и хвалиш 5д технологии за крутой сон ну и много секретных технологий есть комп эта круто
program Numfind;
uses
System.SysUtils;
var
a: array [1..10] of Integer; // 1..10 размерность массива можно изменять, программа будет работать правильно
i, s: Integer;
begin
Randomize;
for i := Low(a) to High(a) do
a[i] := - 25 + Random (151);
WriteLn ('Массив чисел:');
for i := Low(a) to High(a) do
Write (a [i], ' ');
s := 0;
WriteLn;
WriteLn;
WriteLn ('Выбрано: ');
for i := Low(a) to High(a) do begin // цикл выбора чисел больше 20
if (a [i] > 20) then begin
s := s + a [i];
Write (A [i], ' ');
end;
end;
WriteLn;
WriteLn ('Сумма чисел больше 20 = ', s);
s := 0;
WriteLn;
WriteLn ('Выбрано: ');
for i := Low(a) to High(a) do begin // цикл выбора чисел меньше 100
if (a [i] > 0) and (a [i] < 100) then begin
s := s + a [i];
Write (A [i], ' ');
end;
end;
WriteLn;
WriteLn ('Сумма чисел меньше 100 = ', s);
s := 0;
WriteLn;
WriteLn ('Выбрано: ');
for i := Low(a) to High(a) do begin // цикл выбора чисел кратных 3
if (a [i] > 0) and (a [i] mod 3 = 0) then begin
s := s + a [i];
Write (A [i], ' ');
end;
end;
WriteLn;
WriteLn ('Сумма чисел кратных 3 = ', s);
ReadLn
end.