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