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

Для Каждого Число Из Числа Цикл
    Число.Представление =
        ВРег(Число.Представление);
КонецЦикла;
//Числа = [1 : "ОДИН", 2 : "ДВА"]

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