Реферат: Программа обработки данных в библиотеке
do {
// Основное меню
textcolor(15)
textbackground(0)
clrscr()
st=menu(30,5," Список книг "
" Поиск по маске "
" Количество книг "
" Выход из программы "
"\x0")
switch(st) {
case (0):
// Подменю для вывода списка
st=menu(40,6," Расположение: "
" Читальный зал "
" Абонемент "
" Хранилище "
"\x0")
if (st!=0) {
ftm=st-1
scroll()
st=0
}
break
case (1):
// Поиск
cdt[500].name[0]=0
cdt[500].fio[0]=0
cdt[500].price=0