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

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