ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
| Наименование | По подписке [?] | Купить один файл | |
|---|---|---|---|
|
Инверсии.epf
.epf 8,79Kb
1
|
Этот маленький пакетный запрос позволяет получить все инверсии (попарно смежные) в перестановке числовой последовательности. Таким образом можно определить четность/нечетность числа инверсий.
Обработка прилагается.
ВЫБРАТЬ
Таб.НомерСтроки КАК i,
Таб.j КАК j
ПОМЕСТИТЬ Перестановки
ИЗ &ТабИнв КАК Таб;
ВЫБРАТЬ
Таб1.j КАК e1,
Таб2.j КАК e2
ИЗ Перестановки КАК Таб1
ВНУТРЕННЕЕ СОЕДИНЕНИЕ Перестановки КАК Таб2
ПО Таб1.j > Таб2.j И Таб1.i < Таб2.i
Упорядочить По e2 
