Организация = Новый ДеревоЗначений;
Организация.Колонки.Добавить("Подразделение");
Организация.Колонки.Добавить("Численность");
Бухгалтерия = Организация.Строки.Добавить();
Бухгалтерия.Подразделение = "Бухгалтерия";
Бухгалтерия.Численность = 8;
ФинОтдел = Бухгалтерия.Строки.Добавить();
ФинОтдел.Подразделение = "Финансовый отдел";
ФинОтдел.Численность = 3;
РасчетОтдел = Бухгалтерия.Строки.Добавить();
РасчетОтдел.Подразделение = "Расчетный отдел";
РасчетОтдел.Численность = 5;
//Организация = Бухгалтерия
// Финансовый отдел
// Расчетный отдел
Сообщить("Организация = " + Символы.ПС +
Представление(Организация.Строки, " "));
Функция Представление(Знач Ветви, Знач Отступ)
Части = Новый Массив;
Для Каждого Ветвь Из Ветви Цикл
Части.Добавить(Отступ +
Ветвь.Подразделение);
Если Ветвь.Строки.Количество() > 0 Тогда
Части.Добавить(Представление(
Ветвь.Строки, Отступ + " "));
КонецЕсли;
КонецЦикла;
Возврат СтрСоединить(Части, Символы.ПС);
КонецФункции