Габариты двух ящиков - Страница 2 - Мир MS Excel

Регистрация

Напомнить пароль

= Мир MS Excel/Габариты двух ящиков - Страница 2 - Мир MS Excel

Старая форма входа

Страница 2 из 2 « 1 2
Модератор форума: китин

Габариты двух ящиков (Формула вычисления габаритов двух приставленных ящиков)

Габариты двух ящиков

Дата: Суббота, 23.11.2019, 00:45 | Сообщение № 1

Группа: Друзья

Ранг: Старожил

Сообщений: 1851

Репутация: 523 ±

Замечаний: 0% ±

Excel 2013, 2016

Всем привет!
Попалась интересная задачка.
Даны габариты двух ящиков. Три двух- четырёхзначных числа, разделённых значками "х". Это могут быть большие или маленькие, русские или латинские буквы.
Ставим два ящика рядом самыми короткими размерами и находим новые габариты охватывающего параллелепипеда. Результат записываем в аналогичном виде.
В прототипе вопроса размер неполной формулы больше 500 символов. Нашёл другое решение меньше 450.
Вскрываться предлагаю 09.12.2019.
Всем удачи!

К сообщению приложен файл: Gabarit.xlsx (10.1 Kb)

Программировать проще, чем писать стихи.

Ответить

Дата: Четверг, 28.11.2019, 19:42 | Сообщение № 21

Группа: Друзья

Ранг: Старожил

Сообщений: 1851

Репутация: 523 ±

Замечаний: 0% ±

Excel 2013, 2016

Цитата MCH, 28.11.2019 в 13:20, в сообщении № 20 ()

в понедельник можно вскрываться

Маловероятно, но может в выходные кто подтянется. В понедельник 02.12.19 вскрываемся.

Программировать проще, чем писать стихи.

Ответить

Дата: Пятница, 29.11.2019, 10:16 | Сообщение № 22

Группа: Друзья

Ранг: Старожил

Сообщений: 1851

Репутация: 523 ±

Замечаний: 0% ±

Excel 2013, 2016

Цитата MCH, 25.11.2019 в 09:12, в сообщении № 2 ()

в ряде случаев находится решение лучше, чем по описанному алгоритму

Прикинул формулу полного перебора:

Код

=ИНДЕКС(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:1:1:1:1:2:2:2:2:2:2:3:3:3:3:3:3};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:2:2:3:3:1:1:2:2:3:3:1:1:2:2:3:3};)))&"x"&(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};)))+ABS(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)))-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};)))))/2&"x"&(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};)))+ABS(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)))-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};)))))/2;ПОИСКПОЗ(МИН((ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:1:1:1:1:2:2:2:2:2:2:3:3:3:3:3:3};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:2:2:3:3:1:1:2:2:3:3:1:1:2:2:3:3};))))*(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};)))+ABS(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)))-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};)))))/2*(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};)))+ABS(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)))-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};)))))/2);(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:1:1:1:1:2:2:2:2:2:2:3:3:3:3:3:3};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:2:2:3:3:1:1:2:2:3:3:1:1:2:2:3:3};))))*(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};)))+ABS(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)))-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};)))))/2*(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};)))+ABS(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)))-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};)))))/2;))

Всего каких-то 4109 символов.
*Или по классическому алгоритму:

Код

=ИНДЕКС((ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:1:1:1:1:2:2:2:2:2:2:3:3:3:3:3:3};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:2:2:3:3:1:1:2:2:3:3:1:1:2:2:3:3};))))&"x"&--ЕСЛИ(-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)))<-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};))))&"x"&--ЕСЛИ(-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)))<-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};))));ПОИСКПОЗ(МИН((ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:1:1:1:1:2:2:2:2:2:2:3:3:3:3:3:3};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:2:2:3:3:1:1:2:2:3:3:1:1:2:2:3:3};))))*ЕСЛИ(-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)))<-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};))))*ЕСЛИ(-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)))<-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};)))));(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:1:1:1:1:2:2:2:2:2:2:3:3:3:3:3:3};)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({1:1:2:2:3:3:1:1:2:2:3:3:1:1:2:2:3:3};))))*ЕСЛИ(-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)))<-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:2:2:2:2:3:1:3:1:3:1:3:1:2:1:2:1:2};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({2:3:1:3:1:1:2:2:1:1:1:1:2:2:1:1:1:1};))))*ЕСЛИ(-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)))<-ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:3:3:3:3:2:3:1:3:1:3:1:2:1:2:1:2:1};)));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС({3:2:3:1:2:2:3:3:3:3:2:2:3:3:3:3:2:2};))));0))

Программировать проще, чем писать стихи.

Сообщение отредактировал Светлый - Пятница, 29.11.2019, 11:13

Ответить

Дата: Суббота, 30.11.2019, 11:53 | Сообщение № 23

Группа: Друзья

Ранг: Старожил

Сообщений: 2347

Репутация: 997 ±

Замечаний: 0% ±

Excel 2007,2010,2013

однако, можно эту формулу в 3092 символа впихнуть

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Ответить

Дата: Суббота, 30.11.2019, 13:32 | Сообщение № 24

Группа: Друзья

Ранг: Старожил

Сообщений: 1851

Репутация: 523 ±

Замечаний: 0% ±

Excel 2013, 2016

Цитата krosav4ig, 30.11.2019 в 11:53, в сообщении № 23 ()

можно эту формулу в 3092 символа впихнуть

Тогда уж в ~~2704~~ ~~2404~~ 2311 и даже меньше. Ещё не особо оптимизировал.

Программировать проще, чем писать стихи.

Сообщение отредактировал Светлый - Суббота, 30.11.2019, 17:29

Ответить

Дата: Понедельник, 02.12.2019, 07:39 | Сообщение № 25

Группа: Друзья

Ранг: Старожил

Сообщений: 1851

Репутация: 523 ±

Замечаний: 0% ±

Excel 2013, 2016

В задаче надо решить простую подзадачу: из двух ~~зол~~ значений выбрать большее, причём в массиве. Но главное не в этом. Я специально подобрал задачу, чтобы эти значения вычислялись длинной формулой. Выбираем:

Код

=ЕСЛИ(A1>B1;A1;B1)

используется четыре раза. Четыре длинных формулы.
Но есть хитрая формула для арифметического выбора большего значения:

Код

=(A1+B1+ABS(A1-B1))/2

, которую уже можно оптимизировать до двух раз:

Код

=СУММ(ABS(A1+B1*{1;-1}))/2

И даже до одного:

Код

=СУММ(ABS(МУМНОЖ(A1:B1*{1;1:1;-1};{1:1})))/2

Для массива формула будет выглядеть так:

Код

=СУММ(ABS(МУМНОЖ(ИНДЕКС(A1:B3;Ч(ИНДЕКС({1:2:3:1:2:3};));Ч(ИНДЕКС({1;2};)))*{1;-1}^{0:0:0:0:1:1};{1:1}))*10^{8:4:0:8:4:0})/2

На этом принципе и хотел построить решение, оказалось, что есть ещё более ДРУГОЙ путь решения.
Этот вариант 207 и 228 символов, другой вариант 176 и 197 символов с нулями и без.
Вскрываемся?

Программировать проще, чем писать стихи.

Сообщение отредактировал Светлый - Понедельник, 02.12.2019, 07:50

Ответить

Дата: Понедельник, 02.12.2019, 07:45 | Сообщение № 26

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4113

Репутация: 769 ±

Замечаний: 0% ±

Excel 2013/2016

Светлый, За идею 5, за оформление 2

Лучше, уже на 3-

Ну вот, теперь ок.

~~Замечательный~~ Временно просто медведь ~~, процентов на 20~~.

Сообщение отредактировал bmv98rus - Понедельник, 02.12.2019, 07:51

Ответить

Дата: Понедельник, 02.12.2019, 07:54 | Сообщение № 27

Группа: Друзья

Ранг: Старожил

Сообщений: 1851

Репутация: 523 ±

Замечаний: 0% ±

Excel 2013, 2016

Цитата bmv98rus, 02.12.2019 в 07:45, в сообщении № 26 ()

за оформление 2

Слэши в тегах перепутались.
Критиковать-то всякий может. Решение есть?

Программировать проще, чем писать стихи.

Сообщение отредактировал Светлый - Понедельник, 02.12.2019, 08:21

Ответить

Дата: Понедельник, 02.12.2019, 08:50 | Сообщение № 28

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4113

Репутация: 769 ±

Замечаний: 0% ±

Excel 2013/2016

Так я ж не решение и критиковал. :-) Вчера два подхода сделал. Полный перебор остановил после понимания слабой эффективности по отношению к длинне. А лобовой сильно не сократился. Тоже забросил.

~~Замечательный~~ Временно просто медведь ~~, процентов на 20~~.

Ответить

Дата: Понедельник, 02.12.2019, 09:07 | Сообщение № 29

Группа: Админы

Ранг: Старожил

Сообщений: 2004

Репутация: 752 ±

Замечаний: ±

Цитата Светлый, 02.12.2019 в 07:39, в сообщении № 25 ()

Вскрываемся?

Думаю, что можно вскрываться, да и Михаил (bmv) решение забросил
Мое решение:

Код

=ТЕКСТ(СУММ(НАИБОЛЬШИЙ(НАИМЕНЬШИЙ(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2:B2);"х";"x");"x";" ");{1:9:17};8)*{1;10}^4;{1;2;3:4;5;6})*10^{8;4;0:4;0;-4};{1;2;3;5}));"0x0000x0000")

Ответить

Дата: Понедельник, 02.12.2019, 09:29 | Сообщение № 30

Группа: Друзья

Ранг: Старожил

Сообщений: 1851

Репутация: 523 ±

Замечаний: 0% ±

Excel 2013, 2016

И мои:

Код

=ТЕКСТ(СУММ(НАИБОЛЬШИЙ(10^{8:4:0}*ABS(НАИМЕНЬШИЙ(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2:B2);"х";"x");"x";" ");{1:10:19};9)*{1;-1};{4;3:5;2:6;1}));{1:2:3:5}));"0x0000x0000")

Код

=ТЕКСТ(СУММ(10^{8:4:0:8:4:0}*ABS(МУМНОЖ(НАИМЕНЬШИЙ(8^{0;4}*ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2:B2);"х";"x");"x";" ");{1:10:19};9);{1:2:3:1:2:3}+{0;3})*{1;-1}^{0:0:0:0:1:1};8^{0:-4})))/2;"0x0000x0000")

Код

=ПРОСМОТР(2;1/(МИН(МУМНОЖ(LN(ИНДЕКС(ЕСЛИ(-ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9)<-ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1;10;19};9);ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1;10;19};9));Ч(ИНДЕКС({2;3:2;3:2;3:2;3:2;3:3;2:1;3:3;1:1;3:3;1:1;3:3;1:1;2:2;1:1;2:2;1:1;2:2;1};));Ч(ИНДЕКС({2;3:3;2:1;3:3;1:1;2:1;2:2;3:2;3:1;3:1;3:1;2:1;2:2;3:2;3:1;3:1;3:1;2:1;2};))));{1:1})+LN(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС(СТРОКА($6:$23)/6;)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС(ОСТАТ(СТРОКА($6:$23)/2;3)+1;)))))=МУМНОЖ(LN(ИНДЕКС(ЕСЛИ(-ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9)<-ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1;10;19};9);ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1;10;19};9));Ч(ИНДЕКС({2;3:2;3:2;3:2;3:2;3:3;2:1;3:3;1:1;3:3;1:1;3:3;1:1;2:2;1:1;2:2;1:1;2:2;1};));Ч(ИНДЕКС({2;3:3;2:1;3:3;1:1;2:1;2:2;3:2;3:1;3:1;3:1;2:1;2:2;3:2;3:1;3:1;3:1;2:1;2};))));{1:1})+LN(ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС(СТРОКА($6:$23)/6;)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС(ОСТАТ(СТРОКА($6:$23)/2;3)+1;)))));ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС(СТРОКА($6:$23)/6;)))+ИНДЕКС(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1:10:19};9);Ч(ИНДЕКС(ОСТАТ(СТРОКА($6:$23)/2;3)+1;)))&"x"&ТЕКСТ(МУМНОЖ(ИНДЕКС(--ЕСЛИ(-ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9)<-ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1;10;19};9);ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2);"х";"x");"x";" ");{1:10:19};9);ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(B2);"х";"x");"x";" ");{1;10;19};9));Ч(ИНДЕКС({2;3:2;3:2;3:2;3:2;3:3;2:1;3:3;1:1;3:3;1:1;3:3;1:1;2:2;1:1;2:2;1:1;2:2;1};));Ч(ИНДЕКС({2;3:3;2:1;3:3;1:1;2:1;2:2;3:2;3:1;3:1;3:1;2:1;2:2;3:2;3:1;3:1;3:1;2:1;2};)));10^{4:0});"0x0000"))

*Тогда комбинированное вместе с МСН решение 173 символа:

Код

=ТЕКСТ(СУММ(НАИБОЛЬШИЙ(10^{8:4:0}*ABS(НАИМЕНЬШИЙ(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2:B2);"х";"x");"x";" ");{1:9:17};8)*{1;-1};{4;3:5;2:6;1}));{1:2:3:5}));"0x0000x0000")

**Вспомнил, почему от этого варианта отказался - он меньше сантиметра габариты не берёт. Но в реальной ситуации таких размеров не бываетНашёл, когда я ошибся. Скопировал фрагмент с неубранным пробелом и не проверил. Куча разных вариантов была. МСН Зачёт.
***Другое ограничение: если все три габарита больше метра (четыре знака), в ~~обоих~~ моём решениях будет ошибка. Из-за лишнего пробела.
****Файл перезалил.
*****Ещё раз перезалил.

К сообщению приложен файл: GabaritOtvet.xlsx (25.9 Kb)

Программировать проще, чем писать стихи.

Сообщение отредактировал Светлый - Понедельник, 02.12.2019, 15:49

Ответить

Дата: Понедельник, 02.12.2019, 10:53 | Сообщение № 31

Группа: Админы

Ранг: Старожил

Сообщений: 2004

Репутация: 752 ±

Замечаний: ±

Цитата Светлый, 02.12.2019 в 09:29, в сообщении № 30 ()

Другое ограничение: если все три габарита больше метра (четыре знака), в обоих решениях будет ошибка.

У меня вроде считает без ошибок все значения от двузначных до 4х значных
PS: можно на символ уменьшить:

Код

=ТЕКСТ(СУММ(НАИБОЛЬШИЙ(НАИМЕНЬШИЙ(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2:B2);"х";"x");"x";" ");{1:9:17};8)*{1;10}^4;{1;2;3:4;5;6})*10^({8;4;0}-{0:4});{1;2;3;5}));"0x0000x0000")

Ответить

Дата: Понедельник, 02.12.2019, 12:16 | Сообщение № 32

Группа: Друзья

Ранг: Старожил

Сообщений: 2347

Репутация: 997 ±

Замечаний: 0% ±

Excel 2007,2010,2013

Мои не до конца вычищенные формулы, все искал решение короче, а эти до ума не довел

Код

=ЛЕВБ(ТЕКСТ(СУММ(НАИМЕНЬШИЙ(НАИМЕНЬШИЙ(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ("1x"&СТРОЧН(A2:B2);"х";"x");"x";ПОВТОР(" ";99));99*{0:1:2:3}+1;99)*10^{0;6};{1:2:3:4}+{0;4})/10^{0;6}*10^{0:8:4:0};{1;4:1;6:7;8}))-2;ПОВТОР("0000x";3));14)

Код

=ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ТЕКСТ(СУММ(НАИМЕНЬШИЙ(НАИМЕНЬШИЙ(ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ("1x"&СТРОЧН(A2:B2);"х";"x");"x";ПОВТОР(" ";99));99*{0:1:2:3}+1;99)*10^{0;6};{1:2:3:4}+{0;4})/10^{0;6}*10^{0:10:5:0};{1;4:1;6:7;8}))-2;ПОВТОР("x00000";3));"x000";"x");"x00";"x");"x0";"x");2;20)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Ответить

Дата: Понедельник, 02.12.2019, 14:54 | Сообщение № 33

Группа: Друзья

Ранг: Старожил

Сообщений: 1851

Репутация: 523 ±

Замечаний: 0% ±

Excel 2013, 2016

Цитата MCH, 02.12.2019 в 10:53, в сообщении № 31 ()

от двузначных до 4х значных

Совершенно!
А я заточен был на другое и не уделил должного внимания этому фрагменту

Код

=ПСТР(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(A2:B2);"х";"x");"x";" ");{1:9:17};8)

мой вариант на трёх четверных спотыкается. Недодумал.

Цитата MCH, 02.12.2019 в 10:53, в сообщении № 31 ()

можно на символ уменьшить

наоборот увеличилось.

Программировать проще, чем писать стихи.

Ответить

Дата: Понедельник, 02.12.2019, 15:12 | Сообщение № 34

Группа: Админы

Ранг: Старожил

Сообщений: 2004

Репутация: 752 ±

Замечаний: ±

Цитата Светлый, 02.12.2019 в 14:54, в сообщении № 33 ()

наоборот увеличилось.

Я сравнивал со своей первоначальной формулой, а так хуже на 3 знака от минимальной

Ответить

Дата: Вторник, 03.12.2019, 00:04 | Сообщение № 35

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4113

Репутация: 769 ±

Замечаний: 0% ±

Excel 2013/2016

Коллеги, я свое мнение к МШ и избушке высказал в ЛС Светлому. Безусловно, решения отличные и они не противоречат правилам в которых написано, что могут даже не нести практического значения, но обратите внимание на скорость работы. На 200000 строк попробовал и получил что короткие варианты выдали
4,28125-4,757813, мой вариант
длинный

Код

=MIN(--MID(SUBSTITUTE("х"&SUBSTITUTE(LOWER(A2);"x";"х");"х";REPT(" ";99));{1;2;3}*99;99))+MIN(--MID(SUBSTITUTE("х"&SUBSTITUTE(LOWER(B2);"x";"х");"х";REPT(" ";99));{1;2;3}*99;99))&"х"&MAX(SMALL(--MID(SUBSTITUTE("х"&SUBSTITUTE(LOWER(A2);"x";"х");"х";REPT(" ";99));{1;2;3}*99;99);2);SMALL(--MID(SUBSTITUTE("х"&SUBSTITUTE(LOWER(B2);"x";"х");"х";REPT(" ";99));{1;2;3}*99;99);2))&"х"&
MAX(--MID(SUBSTITUTE("х"&SUBSTITUTE(LOWER(A2&"x"&B2);"x";"х");"х";REPT(" ";99));{1;2;3;4;5;6}*99;99))

перевалил за 11
а вот условно средний

Код

=MIN(MMULT(--MID(SUBSTITUTE(SUBSTITUTE("x"&LOWER(A2:B2);"x";"х");"х";REPT(" ";15));{1\1;1\2;1\3;2\1;2\2;2\3;3\1;3\2;3\3}*15;15);{1;1}))&"х"&
-MIN(SMALL(-MID(SUBSTITUTE(SUBSTITUTE(LOWER(A2);"x";"х");"х";REPT(" ";15));{1;16;32};15);2);SMALL(-MID(SUBSTITUTE(SUBSTITUTE(LOWER(B2);"x";"х");"х";REPT(" ";15));{1;16;32};15);2))&"х"&
MAX(--MID(SUBSTITUTE(SUBSTITUTE(LOWER(A2:B2);"x";"х");"х";REPT(" ";15));{1;16;32};15))

показал от 3,453125 до 3,695313

при этом небольшое изменение длинной формулы

Код

=MIN(--MID(SUBSTITUTE(SUBSTITUTE(LOWER(A2);"x";"х");"х";REPT(" ";15));{1;16;32};15))+MIN(--MID(SUBSTITUTE(SUBSTITUTE(LOWER(B2);"x";"х");"х";REPT(" ";15));{1;16;32};15))&"х"&MAX(SMALL(--MID(SUBSTITUTE(SUBSTITUTE(LOWER(A2);"x";"х");"х";REPT(" ";15));{1;16;32};15);2);SMALL(--MID(SUBSTITUTE(SUBSTITUTE(LOWER(B2);"x";"х");"х";REPT(" ";15));{1;16;32};15);2))&"х"&
MAX(--MID(SUBSTITUTE(SUBSTITUTE(LOWER(A2&"x"&B2);"x";"х");"х";REPT(" ";30));{1;2;3;4;5;6}*30;30))

и 2,843002

~~Замечательный~~ Временно просто медведь ~~, процентов на 20~~.

Сообщение отредактировал bmv98rus - Вторник, 03.12.2019, 09:33

Ответить

Дата: Вторник, 03.12.2019, 02:09 | Сообщение № 36

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2941

Репутация: 526 ±

Замечаний: 0% ±

Миша, так в том-то вся соль... Мудря в МШ-Курилке, заставляем мозг выдавать нестандартные ходы. Нет практического применения? Но "шарики-то крутятся", гловоломки решаются. Ты вон тоже не на диване с пультом лежал )

Я тоже начинал в среду (не в первую - позавчера), длиная заготовка "в лоб". Идея такая:

Код

=--ПСТР(A2&"i";СТРОКА($1:$14);{2;3;4})

А там МАКС и НАИБОЛЬШИЙ... но так и зависло, лежит бесполезно

Сообщение отредактировал vikttur - Вторник, 03.12.2019, 02:23

Ответить

Дата: Вторник, 03.12.2019, 07:59 | Сообщение № 37

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4113

Репутация: 769 ±

Замечаний: 0% ±

Excel 2013/2016

[offtop]

Цитата vikttur, 03.12.2019 в 02:09, в сообщении № 36 ()

Мудря в МШ-Курилке, заставляем мозг выдавать нестандартные ходы

Вить, нестандартный ход, должен быть уравновешен с его эффективностью, заменяя AND на * или OR на + (специально взял так, по тому что И и ИЛИ :-) ), мы не сравниваем нагрузку, а жаль . Да, во мне говорить ИТшник которому ходят ходоки со словами дай ресурс. Это и расчетные мощности и место хранения и ПО, без которого "не прожить" . Вот генеральный умудрился за 3 года 30ГБ почты скопить - все надо!!! И дело не в стоимости этих ресурсов, а в эффективном использовании их. Еще раз, это не выпад в сторону решений и мозголомов.[/offtop]

~~Замечательный~~ Временно просто медведь ~~, процентов на 20~~.

Ответить

Габариты двух ящиков (Формула вычисления габаритов двух приставленных ящиков)

Страница 2 из 2
«
1
2

© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!