Реферат: Информационно-справочная система, обеспечивающая работу с базой данных Bit
ление процедуре вывода главного меню Main_menu.
Эта процедура выводит список пунктов главного меню и ожи-
дает от пользователя ввода числа, которое будет занесено в пере-
менную C. После этого вызывается процедура обработки основных ре-
жимов Working, в которую переменная C передается в качестве аргу-
мента. В процедуре использован предикат Repeat, в связи с этим
после возврата из процедуры Working в случае, если C не равно 7
происходит повторный вывод пунктов меню и ожидание ввода числа.
Процедура Autoload предназначена для автоматической загруз-
ки основной базы данных при запуске программы. Это значительно
облегчает работу с системой, так как не требуется при запуске
программы подгружать основную БД из режима "Загрузка". Процедура
Autoload проверяет существование на диске файла bit.dat с по-
мощью встроенного предиката existfile и подгружает БД в память с
помощью предиката consult. В случае отсутствия файла выдается
сообщение об ошибке.
Данная процедура выводит информацию о языке, на котором на-
писана система и данные о создателе.
Процедура Working(1) служит для вывода меню режима коррек-
ции данных, находящихся в БД, и внесения новых записей. После ак-
тивизации процедура выводит меню в котором имеются режимы: "Изме-
нение данных", "Добавление данных" и "Выход в меню". Активизация
режимов происходит аналогично главному меню с помощью нажатия
соответствующей цифровой клавиши. Считанное с клавиатуры число
заносится в переменную X, после чего вызывается процедура
Correct, аргументом которой служит X. С помощью процедур
Correct(1) и Correct(2), описанных ниже, собственно и реализует-
ся режимы коррекции и добавления. В процедуре Working(1) также
применен предикат Repeat, с помощью которого реализован повтор-