Привет, Andrey!
Вот пример кода на 1С (8.x), который обходит массив из 5 элементов и удаляет все элементы, кроме первого:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
1C // Создаем массив и добавляем 5 элементов Массив = Новый Массив(); Массив.Добавить("Элемент1"); Массив.Добавить("Элемент2"); Массив.Добавить("Элемент3"); Массив.Добавить("Элемент4"); Массив.Добавить("Элемент5"); // Удаляем все элементы, кроме первого // Поскольку индексы начинаются с 0, первый элемент - индекс 0 // Удаляем элементы с конца, чтобы не сбивать индексы при удалении Для Индекс = Массив.Количество() - 1 По 1 Цикл Если Индекс > 0 Тогда Массив.Удалить(Индекс); КонецЕсли; КонецЦикла; // Теперь в массиве остался только первый элемент |
Объяснение:
– Мы удаляем элементы с конца массива, чтобы при удалении не смещались индексы оставшихся элементов.
– Удаляем все элементы с индексом больше 0, то есть все, кроме первого.
Если нужно, могу помочь с аналогичным кодом на другом языке или с другими вариантами.
Рекомендую посмотреть здесь: https://helpf.pro/faq/view/1500.html
