Числа = Новый Массив(5);
Числа[0] = 3;
Числа[1] = 5;
Числа[2] = 7;
Числа[3] = 11;
Числа[4] = 13;
Части = Новый Массив;
Для Каждого Элемент Из Числа Цикл
Если (Элемент > 10) Тогда
Прервать;
КонецЕсли;
Части.Добавить(Строка(Элемент));
КонецЦикла;
Стр = СтрСоединить(Части, "-");
//Стр = "3-5-7"
Сообщить("Стр = " + Стр);