Числа = Новый Массив(5);
Числа[0] = 3;
Числа[1] = 5;
Числа[2] = 7;
Числа[3] = 11;
Числа[4] = 13;

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