Обнаружение одиночных ошибок в коде Хэмминга

Inc (k) ;:=true;;; (f) ;not poisk then showmessage ('Записей образца '+maska+' не обнаружено').Предусмотрена возможность вывода данных на печать.Экспорт в Excel.Одновременно новый табельный номер запоминается в списке СоmbоВох3.Кнопка "Поиск" - выполнить поиск по выбору пользователя.Результаты поиска отобразить в редакторе.По кнопке "Закрыть" закрыть файл и осуществить корректное завершение работы.TLabel - метка.Пример показан на рисунке 4.Интерфейс в стиле MS WORD предполагает создание главного меню и панели инструментов.