//Вывод в окно сообщений ОчиститьОкноСообщений(); //Очистим окно сообщений Состояние("Вывожу информацию!"); Сообщить("ИНФОРМАЦИЯ О ПРОГРАММЕ И ПОЛЬЗОВАТЕЛЕ!","I"); Сообщить("Имя Компьтера - " + ИмяКомпьютера()); Сообщить("Имя пользователя - " + ИмяПользователя()); Сообщить("Полное имя пользователя - " + ПолноеИмяПользователя()); Сообщить("Права пользователя - " + НазваниеНабораПрав()); Сообщить("Название интерфейса - " + НазваниеИнтерфейса()); если Монопольныйрежим()=1 тогда моноп="Монопольный режим" иначе моноп="НЕ монопольный режим" Конецесли; сообщить(моноп); Сообщить("Каталог пользователя - " + КаталогПользователя()); Сообщить("Каталог ИБ - " + КаталогИБ()); Сообщить("Каталог Программы - " + КаталогПрограммы()); Сообщить("Каталог Временных Файлов" + КаталогВременныхФайлов());