Помогите решить задачу в массиве нужно удалить каждый 3-й элемент например пользователь вводит 12 символов , ответ 1,2,4,5,7,8,10,11, и потом 1,2,5,7,8,11 и т.д
вообщем не могу понять ,помогите пожалуйста!


&НаКлиенте
Процедура Удалить(Команда)

Массив = Новый Массив(Объект.ПолеВвода);
ВсегоЭлементов = Массив.Количество()-1;

Для Индекс = 2 По ВсегоЭлементов Цикл
Сообщить(Индекс);
Массив.Удалить(Индекс);
Индекс = Индекс + 3;
Если Индекс <= ВсегоЭлементов Тогда Продолжить;

КонецЕсли;

КонецЦикла;

КонецПроцедуры