Для каждого ШтрихКод из МассивШтрихКодов цикл
// Удаляем записи штрих-кода из регистра
НаборЗаписей=РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.ШтрихКод.Установить(ШтрихКод);
НаборЗаписей.Записать(истина);
// Добавляем новую запись штрих-кода в регистр
Запись = НаборЗаписей.Добавить();
Запись.Штрихкод = ШтрихКод;
Запись.Владелец = Товар;
Запись.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13;
Запись.ЕдиницаИзмерения = Единица;
Запись.Качество = Справочники.Качество.НайтиПоНаименованию("Новый");
НаборЗаписей.Записать(ложь);