взять КонсольныйЛоггер из Системное.Логгеры
взять РепозиторийПользователейАбстракция из Проект.Репозитории.РепозиторийПользователейАбстракция

запись Пользователь
    Номер: цел
    Имя: строка
    Возвраст: бцел16
.

контракт УправлениеОбъектамиАбстракция(+ ТТип)
    функция Создать(пользователь: ТТип): цел
    функция Изменить(пользователь: ТТип)
    функция Удалить(номер: цел)
    функция Взять(номер: цел): ТТип
    функция ВзятьВсе(): ТТип()
.

контракт УправлениеПользователямиАбстракция : УправлениеОбъектамиАбстракция(Пользователь)
    УдалитьВсе()
.

модуль УправлениеПользователями : УправлениеПользователямиКонтракт
    конструктор(логгер: ЛоггерАбстракция, репозиторийПользователей: РепозиторийПользователейАбстракция)
        модуль.логгер = логгер
        модуль.репозиторийПользователей = репозиторийПользователей
    .

    видимые:
        функция Создать(пользователь: Пользователь): цел
            текПользователь := репозиторийПользователей.Взять(пользователь.Номер)
            
            если текПользователь не пусто
                возврат
            .
            
            пытаться
                текПользователь = репозиторийПользователей.Создать(пользователь)
                модуль.логгер.Запись("Пользователь ((пользователь.Имя)) успешно создан")
            исключение
                модуль.логгер.Ошибка("Ошибка создания пользователя ((пользователь.Имя))")
            .
            
            возврат текПользователь.Номер
        .
        
        функция Изменить(пользователь: Пользователь)
            //ПОЗЖЕ
        .
        
        функция Удалить(номерПользователя: цел)
            //ПОЗЖЕ
        .
        
        функция УдалитьВсе()
            //ПОЗЖЕ
        .
        
        функция Взять(номерПользователя: цел): Пользователь
            //ПОЗЖЕ
        .
        
        функция ВзятьВсе(): Пользователь()
            бросить НетРеализацииИсключение("Пока нет реализации")
        .
        
    невидимые:
        логгер: ЛоггерАбстракция
        репозиторийПользователей: РепозиторийПользователейАбстракция
.

логгер := КонсольныйЛоггер()
репозиторий := РепозиторийПользователейАбстракция(логгер)

пользователи := Пользователь()( 
    Пользователь(1, "Вася", 25),
    Пользователь(2, "Митя", 37),
    Пользователь(3, "Дуся", 21)
)

управПользователями := УправлениеПользователями(логгер, репозиторий)

цикл текПользователь из пользователи
    управПользователями.Создать(текПользователь)
.

АО "МЦСТ" объявляет о раскрытии исходных кодов ядра linux, системных библиотек, патчей совместимости для ПО с открытым исходным кодом, обеспечивающих работу с архитектурой данной платформы. Этот шаг делается для развития открытого ПО для процессоров "Эльбрус".