Не работает программа товарооборота из методички

#include <stdio>
#include <conio>
#include <math>
#include <stdlib>
#include <string>
//----------------------------------------------константы----------------------------------------------------------
const int N_ITEMS=8; // количество пунктов меню
const int L_PRODUCT=30; // длина названия товара
const int step=18; // количество строк на странице
const int N_SHOP=10; // номер магазина
const int N_SECT=10; //номер секции
//------------------------------------типы и глобальные переменные------------------------------------
struct prod { //структура для хранения данных о товаре
    char name[L_PRODUCT]; //название товара
    float article, price, number; //вес, цена и количество товара
    date d; //дата продажи товара
    float allprice; // общая сумма полученная от продажи всех товаров в магазине
 
};
struct elist{ //элемент 2- направленного списка
    prod data; //данные о товаре
    elist *left; //указатель на элемент слева
    elist *right; //указатель на элемент справа
};
unsigned int defaultmode, //текущий режим экрана
        activecolor, //цвет активного пункта меню
        inactivecolor; //цвет неактивного пункта меню
int key; //код клавиши
unsigned int item; //номер пункта меню
unsigned int prev; //номер предыдущего пункта меню
elist *beg,        //указатель на первый эл-т списка
      *fin,        //указатель на последний эл-т списка
      *p;          //указатель на текущий эл-т списка
char name[L_PRODUCT]; //название товара
prod product; //данные товара
//-----------------------------------------прототипы функций-------------------------------------------------
void add(elist* &beg,elist* &fin,prod product);     //добавление элемента в список
void error(char *message);                          //вывод сообщения ошибки
int readfile( elist* &beg, elist* &fin);            //ввод базы из файла
int showbase(elist *beg);                           //вывод базы на экран
void drawitem(unsigned int item, unsigned int color); //вывод пункта меню
void initmenu(unsigned int activecolor, unsigned int inactivecolor); //инициализация меню
void clear(void);                                   //очистка текстового окна
void stub(unsigned int item);                       //заглушка
void dlgwindow(void);                               //отображение окна диалога
void message(char *message);                        //вывод сообщения
prod query();                                       //запрос сведений о товаре
void edit(elist* beg, prod product);                //исправление записи о товаре
elist calc();                                       //поиск эл-та в списке по названию
void queryname(char *s);                            //запрос названия товара
void del(elist* &beg,elist* &fin,elist *p);         //удаление эл-та из списка
void info(prod product);                            //вывод сведений о товаре
void select(elist *beg);                            //определение обьема товарооборота
void queryprice(float &startprice, float &endprice);//ввод критериев отбора
//========================Главная функция============================
int main() {
defaultmode=LASTMODE; //запомнить текущий текстовый режим экрана
textmode(C80); //установить режим 80х25 цветной
 
beg=0; fin=0; //обнулить указатели на начало и конец списка
readfile(beg, fin); //ввести базу из файла в список
 
clrscr(); //очистить экран
activecolor=LIGHTGREEN; //цвет активного пункта меню - светло-зеленый
inactivecolor=GREEN; //цвет неактивного пункта меню - зеленый
initmenu(activecolor,inactivecolor); //инициализация меню
 
item=0; prev=0; //обнулить индексы тек. и пред. пунктов меню
 
/* ---- цикл выбора пункта меню ---- */
while (1) { /**1**/
    key=getch(); //ввести код нажатой клавиши
    if (key==0) key=getch(); //если введен расширенный код
    switch (key) { /**2**/ //проверить код нажатой клавиши
        /* ----выполнение пункта меню----*/
        case 13: // нажата Enter
            switch (item) { /**3**/ //проверка номера пункта меню
                case 0:showbase(beg); //вывод базы на экран
                        break;
                case 1 : //добавление записи в базу
                        product=query();
                        add(beg,fin, product);
                        break;
                case 2: //редактирование записи
                        product=query();
                        edit(beg, product);
                        break;
                case 3: //удаление записи
                        queryname(name);
                        p=find(beg,name);
                        if (p) del(beg,fin,p);
                        break;
                case 4: //поиск модели в базе
                        queryname(name);
                        p=find(beg,name);
                        if (p) info(p->data);
                        break;
                case 5: //выборка из базы по цене
                        select(beg);
                        item=5;
                        break;
                case 6:
                        queryname(name);
                        allprice=(price(beg)*price(fin))*(number(beg)*number(fin));
            default: // выход из программы
                        textmode(defaultmode);
                        exit(1);
        }; /**3**/
        break;
    /*----перемещение курсора влево----*/
    case 15: case 75: // нажаты Shift+Tab или Left
        prev=item;
        if (item==0)
            item=N_ITEMS-1;
        else item--;
        break;
    /*----перемещение курсора право----*/
    case 9: case 77: //нажаты Tab или Right
        prev=item;
        if (item==N_ITEMS-1)
            item=0;
        else item++;
        break;
    } /**2**/
clear();
drawitem(prev, inactivecolor); //вывод предыдущего пункта
drawitem(item, activecolor); //вывод выбранного пункта
} /**1**/
}
//-----------------------------------------Вывод пункта меню-------------------------------------------------
void drawitem(unsigned int item, unsigned int color) {
const d=12; // длина поля пункта меню
const char * items[N_ITEMS]= //названия пунктов
{"Просмотр","Добавить","Исправить","Удалить","Найти","Выбрать","Выход"};
const int pos[N_ITEMS]={1,d,2*d,3*d,4*d,5*d,6*d}; //позиции начала полей пунктов
window(1,1,80,2); //окно для отображения пунктов
textbackground(LIGHTGRAY); //цвет фона в окне светло-серый
textcolor(color); //цвет букв пункта
gotoxy(pos[item],1); //установить курсор в начало пункта
cprintf("%s",items[item]); //отобразить название пункта
}
//----------------------------------------Инициализация меню---------------------------------------------
void initmenu(unsigned int activecolor, unsigned int inactivecolor){
unsigned int item; //номер пункта меню
window(1,1,80,2); //окно из двух строк для вывода пунктов
textbackground(LIGHTGRAY); //цвет фона в окне светло-серый
clrscr();
/*----отобразить названия пунктов меню----*/
drawitem(0,activecolor); //активный цветом «Просмотр»
for (item=1;item<N_ITEMS;item++)
drawitem(item,inactivecolor); //все остальные неактивным
/* ----отобразить границу окна меню, подчеркнув его снизу----*/
gotoxy(1,2);
textcolor(inactivecolor);
cputs("________________________________________________________________");
gotoxy(1,1); //курсор на «Просмотр»
}
//---------------------------------------------Очистка рабочего окна ---------------------------------------
void clear() {
window(1,3,80,25);
textattr(WHITE);
clrscr();
}
// ----------------------------------------------------Заглушка---------------------------------------------------
void stub(unsigned int item) {
window(1,4,80,24);
textbackground(LIGHTGRAY);
textcolor(WHITE);
clrscr();
cprintf("Вызван пункт меню %d ",item);
getch();
}
//-------------------------------------------Вывод сообщения ошибки-------------------------------------
void error(char message[]) {
window(10,6,70,12);
textbackground(LIGHTGRAY);
textcolor(RED);
clrscr();
gotoxy(15,4);
cputs(message);
getch();
textmode(defaultmode);
}
//--------------------------------------- Отображение окна диалога-------------------------------------
void dlgwindow(){
window(10,6,70,12);
textattr(GREEN+LIGHTGRAY*16);
clrscr();
}
//------------------------------------------------Вывод сообщения------------------------------------------
void message(char message[]) {
dlgwindow();
gotoxy(20,4);
cputs(message);
getch();
}
//-----------------------------------Добавление элемента в конец списка-----------------------------
void add(elist* &beg,elist* &fin,tel telefon){
elist *p; //указатель на создаваемый элемент
p=new elist; //создание нового элемента
p->data=product; //заполнение его информационной части
p->right=0; //заполнение его указателей
p->left=fin;
if (!beg) beg=p; //если список был пустым
 else fin->right=p; //иначе привязка нового эл-та к последнему
fin=p; //обновление указателя на конец списка
}
//--------------------------------------------Ввод базы из файла---------------------------------------------
int readfile( elist* &beg, elist* &fin){
FILE *f;
tel telefon;
/*-----проверка открытия файла base.txt ----*/
f=fopen("c:\\bc5\\work\\base.txt","r");
if(!f) {
error("Файл base.txt не найден");
exit(1);
}
/*----чтение записей из файла----*/
while (!feof(f)) {
fgets(product.name,L_PRODUCT,f); //чтение названия модели
fscanf(f,"%f%f\n",&product.number,&product.price,&product.article); //чтение веса и цены
add(beg,fin, product); //добавление в список
}
fclose(f);
return 0;
}
//--------------------------------------------Вывод базы на экран------------------------------------------
int showbase(elist *beg) {
int i; //счетчик кол-ва строк
elist *p, //указатель на текущий элемент страницы
*pn; //указатель на 1 -ый эл-т страницы
int key; //код нажатой клавиши
elist * showpage(elist *p); //прототип функции вывода одной страницы
if (!beg) { //если список пустой,
 message("Список пустой"); //то вывести сообщение
 return -1;
 }
/*----задать параметры рабочего окна----*/
window(1,4,80,24);
textbackground(LIGHTGRAY);
textcolor(WHITE);
p=beg; //указатель установить в начало списка
while (1) { /**1**/
pn=p; //запомнить указатель первого эл-та страницы
/*---вывести страницу и получить новое значение указателя текущего элемента---*/
p=showpage(p);
/*----определить код нажатой клавиши----*/
key=getch();
if (key==0) key=getch(); //если расширенный код
/*----управление прокруткой-----*/
switch (key) { /**2**/
case 27: //нажата Esc
 return 0; //выход из просмотра
case 13: case 80: case 81: //если нажаты Enter||Down||PgDn
 if (!p) p=pn; //и список исчерпан, то
 break; //отображать ту же страницу
case 72: case 73: //если нажаты Up или PgUp,
 p=pn; //то указатель на начало стр.
 for(i=1;(i<=step)&&(p);i++)
 p=p->left; //сместить на step записей вверх
 if (!p) p=beg; //ограничение для 1 -ой записи
 break;
 } /**2**/
} /**1**/
}
//----------------------------------------Вывод одной страницы-------------------------------------------
elist* showpage(elist *p){
int i; //номер строки вывода
clrscr();
/*---вывести в первую строку окна заголовок таблицы----*/
gotoxy(1,1);
cprintf("Название Цена Артикул Количество");
/*---начиная со второй строки окна выводить элементы списка---*/
gotoxy(1,2);
i=2;
while (p) {
 cprintf("%-22.20s %5.2f %10.2f",p->data.name,p->data.price,p->data.article,p->data.number);
 p=p->right;
 i++;
 gotoxy(1,i);
 cprintf("Товарооборот")
 gotoxy(1,i+1);
 cprint("%-22.20s",p->data.allprice);
 /*----выйти из функции, если выведена одна страница----*/
 if (i>step) return p; //и вернуть указатель текущего эл-та списка
 }
return p; //выход при достижении конца списка
}
//-------------------------------------Запрос сведений о товаре---------------------------------------
prod query(){
char s[L_PRODUCT]; //название товара
prod product; //данные о товаре
int i; //индекс строки
int len; //длина строки с названием 
dlgwindow(); //отобразить окно диалога
/*---ввод названия товара---*/
do {
gotoxy(2,1);
cputs("Название?");
gotoxy(2,2); clreol();
cscanf("%s",s);
len=strlen(s);
for (i=len; i<L_PRODUCT-1; i++)
s[i]=' '; //дополнение строки пробелами
s[L_PRODUCT-1]='\0'; }
while (!len);
strcpy(product.name,s);
/*---ввод значения количество товара---*/
do {
gotoxy(2,3);
cputs("Количество?");
gotoxy(2,4); clreol();
cscanf("%s",s);
product.number=atof(s);}
while (!product.number);
/*---ввод значения цены товара---*/
do {
gotoxy(2,5);
cputs("Цена?");
gotoxy(2,6); clreol();
cscanf("%s",s);
product.price=atof(s); }
while (!product.price);
getch(); //очистка буфера ввода
/*---артикул---*/
do {
gotoxy(2,5);
cputs("Артикул?");
gotoxy(2,6); clreol();
cscanf("%s",s);
product.article=atof(s); }
while (!product.article);
getch(); //очистка буфера ввода
return product;
}
// ------------------------------ Исправление записи о товаре -------------------------------------
void edit(elist* beg, tel product) {
elist *p; //указатель на найденный эл-т
p=find(beg,product.name); //поиск товара
if (p) { //если модель найдена,
p->data.weight=product.number; //то изменить вес
p->data.price=product.price; // и изменить цену
 }
}
// ----------------------------------Поиск эл-та в списке (по названию модели)----------------------
elist * find(elist *p, char *s){
/*---цикл по элементам списка ----*/
while (p) {
if (strcmp(s,p->data.name)==0) //если модель найдена,
 return p; //то возвратить указатель
p=p->right; //переход к след. эл-ту списка
}
/*---если модель не найдена----*/
gotoxy(2,6);
message("Такого товара в списке нет");
p=0;
return p;
 }
 // ------------------------------------Запрос названия товара-----------------------------
void queryname(char *name){
 int i; //индекс строки
int len; //длина строки с названием модели
char s[L_PRODUCT]; //название товара
dlgwindow(); //отобразить окно диалога
/*---ввод названия модели---*/
do {
gotoxy(2,2);
cputs("Название?");
gotoxy(2,3); clreol();
cscanf("%s",s);
len=strlen(s);
for (i=len; i<L_PRODUCT-1; i++)
s[i]=' '; //дополнение строки пробелами
s[L_PRODUCT-1]='\0'; }
while (!len);
strcpy(name,s);
getch(); //очистка буфера ввода
}
 //-----------------------------------Удаление эл-та из списка-----------------------------------------------
void del(elist* &beg,elist* &fin,elist *p){
if ((p==beg)&&(p==fin)) //удаление единственного элемента
 { beg=0; fin=0;}
else
if (p==beg) //удаление из начала списка
{beg=beg->right; beg->left=0;}
 else
if (p==fin) //удаление с конца
{fin=fin->left; fin->right=0;}
else { //удаление из середины
 p->left->right=p->right; //связать предыдущий со следующим
 p->right->left=p->left; //связать следующий с предыдущим
 }
free(p); //освобождение памяти из под элемента
}
//-----------------------------------Вывод сведений о товаре------------------------------------------
void info(prod product){
dlgwindow(); //отобразить окно диалога
gotoxy(2,2); cprintf("Название %s",product.name);
gotoxy(2,4); cprintf("Количество %5.2f",product.number);
gotoxy(2,6); cprintf("Цена  %6.2f",product.price);
gotoxy(2,8); cprintf("Артикул %6.2f",product.article);
 
getch(); //ожидать нажатия любой клавиши
}

#include <cstdio>
#include <conio.h>
#include <cmath>
#include <cstdlib>

#include <stdio.h>
#include <conio.h>
#include <math.h>
#include <stdlib.h>
#include <string.h>