В чём может быть ошибка в программе?

#include<stdio.h>
#include<conio.h>
#include<malloc.h>
#include<string.h>
#include<io.h>
#define k 5
#define TREE struct der
struct SISTEMA
{char st[20]; // станция назначения
int nom_p; //  номер поезда
float vr; // время отправления
};
TREE
{SISTEMA w;
int c; // счетчик повторяющихся элементов
TREE *l; // ссылка влево
TREE *r; // ссылка вправо
};
TREE *q,*pr,*nom,*kr=0; // ссылки на корень дерева
SISTEMA *T;
char *menu[k] [60];
int i, pp, m; char key[20]; char name[20];
int Main_Menu(void); // функция меню
int Poisk_nom_p (TREE *d, int v); // поиск по номеру поезда
TREE *der (TREE *kr, SISTEMA word); // формирование дерева
void Crt_Der(); // Запись в дерево информации и вывод дерева на экран
void print_der (TREE *kr); // Печать дерева
int Poisk_st (TREE *d, char s[20]); // поиск по станции назначения
int main()
{pp=1; T=0;
*menu[0]= <<1. Создание дерева>>;
*menu[1]= <<2. Чтение дерева>>;
*menu[2]= <<3. Поиск по номеру в дереве>>;
*menu[3]= <<4. Поиск по названию станции в дереве>>;
*menu[4]= <<5. Конец работы>>;
*menu[5]= <<Введите номер строки:>>;
clrscr();
printf (<< <<Расписание ж/д 2015>>\n>>);
while(pp)
{Main_Menu();
clrscr();
}
printf (<<Конец работы с деревьями\n>>);
return 0;
}
/*Функция меню*/
Main_Menu(void)
{int ns, s;
flushall();
do
{for (i=0; i<k; i++)
printf (<<\n % s>>,*menu[i]);
printf (<<\n>>);
if (s=((scanf (<<%d>>,&ns)<1)))
{flushall(); clrscr();
printf (<<\n Ошибка в номере!! Будте внимательны>>);
}
}
while(s);
switch(ns)
{case 1: Crt_Der(); break;
case 2: print_der(kr);
getche();
break;
case 3:
/*Поиск по времени*/
printf (<<\n Введите номер поезда:>>);
int v;
scanf (<<%d>>,&v);
Poisk_nom_p (kr, v); break;
case 4:
/*Поиск по станции назначения*/
int sr, fl;
char s[20];
printf (<<\n Введите станцию назначения:>>);
scanf (<<%s>>, s);
Poisk_st (kr, s); break;
case 5: pp=0;
} return 0;
}
/*Формирование дерева*/
TREE *der (TREE *kr, SISTEMA word)
{if (kr==NULL) // дерево пустое, записываем информацию в вершину
{kr=new TREE; // выделяется память под новый элемент
 printf (<<\n % d % s%.2f>>, word.nom_p, word.st, word.vr);
printf (<<\n Номер поезда % d>>, word.nom_p);
printf (<<\n Станция назначения % s>>, word.st);
printf (<<\n Время отправления%.2f>>, word.vr);
kr->w=word; // присваиваем информацию
kr->c=1;
kr->l=kr->r=NULL;
}
else if (word.nom_p==kr->w.nom_p) // сравниваем поступившую информацию с информацией в узле
kr->c++; // элементы одинаковы, включается счетчик
else if (word.nom_p<kr->w.nom_p) kr->l=der (kr->l, word); // пока не встретится 0
else kr->r=der (kr->r, word); // иначе вправо
return kr;
}
/*Запись в дерево информации и вывод дерева на экран*/
void Crt_Der()
{
SISTEMA a;
a.nom_p=0;
while (a.nom_p!=-1)
{
printf (<<\n Введите номер поезда: (-1 – выход)>>);
scanf (<<%d>>, &a.nom_p);
if (a.nom_p==-1)
break;
flushall();
{printf (<<\n Введите название станции:>>);
scanf (<<%s>>, a.st);
printf (<<\n Введите время отправления:>>);
scanf (<<%f>>, &a.vr);
if (a.nom_p!=-1)
kr=der (kr, a);
}
}
}
/*Печать дерева*/
void print_der (TREE *kr)
{if(kr)
{print_der (kr->l); // обход левых ветвей
printf (<<\n Номер поезда % d>>, kr->w.nom_p);
printf (<<\n Станция назначения % s>>, kr->w.st);
printf (<<\n Время отправления%.2f>>, kr->w.vr);
printf (<<\n>>);
print_der (kr->r); // обход правых ветвей
}
}
/*Поиск по номеру поезда*/
int Poisk_nom_p (TREE *d, int v)
{
if (d==NULL)
{
printf (<<\n \t Элемент с заданным ключом не найден\n>>);
return 0;
}
else // Поиск элемента с заданным ключом
{if (v==d->w.nom_p)
{
printf (<<\n Станция назначения % s>>, d->w.st);
printf (<<\n Время отправления%.2f>>, d->w.vr);
print_der(kr);
getch();
}
/*Рекурсивный обход*/
if (v<d->w.nom_p) Poisk_nom_p (d->l, v);
if (v>d->w.nom_p) Poisk_nom_p (d->r, v);
}
}
/*Поиск по названию станции*/
int Poisk_st (TREE *d, char s[20])
{int sr, fl;
if (d==NULL)
printf (<<\n \t Элемент с заданным ключом не найден\n>>);
else // Поиск элемента с заданным ключом
{sr=strcmp (s, d->w.st);
if (sr<0)
{q=d; // сохраняем предидущую вершину
fl=1; // двигаемся влево
Poisk_st (d->l, s); // спускаемся влево
}
else
if (sr>0)
{q=d; // сохраняем предидущую вершину
fl=0; // двигаемся вправо
Poisk_st (d->r, s); // спускаемся вправо
}
else // нужный ключ (станция назначения) найден
{if (sr==0)
printf (<<\n Номер поезда % d>>, kr->w.nom_p);
printf (<<\n Время отправления%.2f>>, kr->w.vr);
getch();
}
/*Рекурсивный обход*/
if (s<d->w.st) Poisk_st (d->l, s);
if (s>d->w.st) Poisk_st (d->r, s);
}
 
}