Числа = Новый СписокЗначений;
Числа.Добавить(1, "один");
Числа.Добавить(2, "два");

Части = Новый Массив;
Для Н = 0 По Числа.Количество() - 1 Цикл
    Части.Добавить("{" + Числа[Н].Значение +
        " : """ + Числа[Н].Представление +
        """}");
КонецЦикла;
Стр = СтрСоединить(Части, ", ");
//Стр = "{1 : "один"}, {2 : "два"}"
Сообщить("Стр = " + Стр);