//Возвращается новый массив, порядок первых вхождений
//сохраняется, исходный массив не меняется
Покупатели = Новый Массив;
Покупатели.Добавить("ООО Ромашка");
Покупатели.Добавить("ИП Сидоров");
Покупатели.Добавить("ООО Ромашка");
Покупатели.Добавить("АО Вектор");
Покупатели.Добавить("ИП Сидоров");
Уникальные = ОбщегоНазначенияКлиентСервер.СвернутьМассив(Покупатели);
//Уникальные = "ООО Ромашка", "ИП Сидоров", "АО Вектор"
Сообщить("Уникальные = [" + СтрСоединить(Уникальные, ", ") + "]");
//Было = 5
Сообщить("Было = " + Покупатели.Количество());
//Без БСП - цикл с проверкой через Найти
Уникальные = Новый Массив;
Для Каждого Покупатель Из Покупатели Цикл
Если Уникальные.Найти(Покупатель) = Неопределено Тогда
Уникальные.Добавить(Покупатель);
КонецЕсли;
КонецЦикла;
//Уникальные = "ООО Ромашка", "ИП Сидоров", "АО Вектор"
Сообщить("Уникальные = [" + СтрСоединить(Уникальные, ", ") + "]");