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