银行排队

实验报告课程名称数据结构实验项目名称银行排队模拟班级与班级代码09信管2班092511012 实验室名称（或课室）SS1—204专业信息管理与信息系统任课教师杨志华学号：09251101208姓名：陈运亮实验日期：2010年11 月27日广东商学院教务处制实验：银行排队模拟一、实验目的熟悉掌握队列和线性表数据结构的操作二、实验环境1、Windows操作系统；2、Visual C++ 6.0三、实验内容利用队列、线性表实现模拟银行排队系统四、概要设计要求包括：存储结构的类型定义；队列示意图；项目组成图；exp2_2.cpp的程序文件包含的函数原型及功能、程序文件简介；函数调用关系图。

1.队列存储结构的类型定义：typedef struct QNode{QElemType data;QNode *next;}*QueuePtr;2.队列示意图3. 项目组成图4. exp3_6.cpp的程序文件包含的函数原型及功能、程序文件简介(1) Status InitList(LinkList &L): 构造一个空的线性链表(2) Status InitQueue(LinkQueue &Q):构造一个空队列Q。

(3) Status OrderInsert(LinkList &L,ElemType e,int (*comp)(ElemType,ElemType)):已知L为有序线性链表，将元素e按非降序插入在L中。

(4) Status EnQueue(LinkQueue &Q,QElemType e):插入元素e为Q的新的队尾元素。

(5) Status DeQueue(LinkQueue &Q,QElemType &e):若队列不空,删除Q的队头元素,用e返回其值,并返回OK,否则返回ERROR。

(6) Status DelFirst(LinkList &L,Link h,Link &q): h指向L的一个结点，把h当做头结点，删除链表中的第一个结点并以q返回。

(7) void OpenForDay():银行业务初始化。

(8) void CustomerArrived():处理客户到达事件。

(9) void CustomerDepature():处理客户离开事件。

(10) void Bank_Simulation():银行业务模拟。

(11) int main():调用基本函数实现。

5. 函数调用关系图五、详细设计源代码清单见附录1.六、测试、改进、界面附录——源代码清单附录1/*文件名:exp3-6.cpp*/#include "stdio.h"#include "stdlib.h"#include "math.h"#define Qu 4 //客户队列数#define Khjg 5 //两相邻到达的客户的时间间隔最大值#define Blsj 30//每个客户办理业务的时间最大值#define OK 1#define ERROR 0#define TRUE 1#define FALSE 0typedef int Status;typedef int Boolean;typedef struct{int OccurTime; //事件发生时刻int NType; //事件类型，Qu表示到达事件，//0-Qu-1表示Qu个窗口的离开事件}Event,ElemType;//事件类型，有序链表LinkList的数据元类型typedef struct LNode // 结点类型{ElemType data;LNode *next;}*Link,*Position;struct LinkList // 链表类型{Link head,tail; // 分别指向线性链表中的头结点和最后一个结点 int len; // 指示线性链表中数据元素的个数};typedef LinkList EventList; // 事件链表类型，定义为有序链表typedef struct{int ArrivalTime;int Duration;}QElemType; //队列的数据元素类型typedef struct QNode{QElemType data;QNode *next;}*QueuePtr; //队列struct LinkQueue{QueuePtr front,rear; // 队头、队尾指针};EventList ev;//事件表Event en; //事件Event et;//临时变量LinkQueue q[Qu]; //Qu个队列客户QElemType customer; //客户记录int TotalTime=0,CustomerNum=0;//累计客户逗留时间,客户数(初值为0)int CloseTime; // 银行营业时间(单位是分)int cmp(Event a,Event b){ // 依事件a的发生时刻<、=或>事件b的发生时刻分别返回-1、0或1if(a.OccurTime==b.OccurTime)return 0;elsereturn (a.OccurTime-b.OccurTime)/abs(a.OccurTime-b.OccurTime);}Status InitList(LinkList &L){ // 构造一个空的线性链表Link p;p=(Link)malloc(sizeof(LNode)); // 生成头结点if(p){p->next=NULL;L.head=L.tail=p;L.len=0;return OK;}elsereturn ERROR;}//InitListStatus InitQueue(LinkQueue &Q){ // 构造一个空队列Qif(!(Q.front=Q.rear=(QueuePtr)malloc(sizeof(QNode))))exit(-1);Q.front->next=NULL;return OK;}//InitQueueStatus OrderInsert(LinkList &L,ElemType e,int (*comp)(ElemType,ElemType)) { // 已知L为有序线性链表，将元素e按非降序插入在L中。

（用于一元多项式） Link o,p,q;q=L.head;p=q->next;while(p!=NULL&&comp(p->data,e)<0) // p不是表尾且元素值小于e{q=p;p=p->next;}o=(Link)malloc(sizeof(LNode)); // 生成结点 o->data=e; // 赋值q->next=o; // 插入o->next=p;L.len++; // 表长加1if(!p) // 插在表尾L.tail=o; // 修改尾结点return OK;}//OrderInsertvoid OpenForDay(){int i;InitList(ev);en.OccurTime=0;en.NType=Qu;OrderInsert(ev,en,cmp);//插入事件表for(i=0;i<Qu;++i)InitQueue(q[i]);}//OpenForDayvoid Random(int &d,int &i){d=rand()%Blsj+1;//1到Blsj之间的随机数i=rand()%Khjg+1;}//Randomint QueueLength(LinkQueue Q){ // 求队列的长度int i=0;QueuePtr p;p=Q.front;while(Q.rear!=p){i++;p=p->next;}return i;}//QueueLengthint Minimum(LinkQueue Q[]) //返回最短队列的序号{int l[Qu],i,k;for(i=0;i<Qu;i++)l[i]=QueueLength(Q[i]);k=0;for(i=1;i<Qu;i++)if(l[i]<l[0]){l[0]=l[i];k=i;}//ifreturn k;}//MinimumStatus EnQueue(LinkQueue &Q,QElemType e){ // 插入元素e为Q的新的队尾元素QueuePtr p;if(!(p=(QueuePtr)malloc(sizeof(QNode)))) // 存储分配失败exit(OVERFLOW);p->data=e;p->next=NULL;Q.rear->next=p;Q.rear=p;return OK;}//EnQueueStatus DeQueue(LinkQueue &Q,QElemType &e){ // 若队列不空,删除Q的队头元素,用e返回其值,并返回OK,否则返回ERROR QueuePtr p;if(Q.front==Q.rear)return ERROR;p=Q.front->next;e=p->data;Q.front->next=p->next;if(Q.rear==p)Q.rear=Q.front;free(p);return OK;}//DeQueuevoid CustomerArrived(){QElemType f;int durtime,intertime,i;++CustomerNum;Random(durtime,intertime);et.OccurTime=en.OccurTime+intertime; //下一客户到达时刻，隔了intertime来了下一//个客户et.NType=Qu; // 队列中只有一个客户到达事件if(et.OccurTime<CloseTime)OrderInsert(ev,et,cmp); //不让下一个进入营业厅了i=Minimum(q); //处理当前进来的人f.ArrivalTime=en.OccurTime;f.Duration=durtime;EnQueue(q[i],f);if(QueueLength(q[i])==1){et.OccurTime=en.OccurTime+durtime;et.NType=i;OrderInsert(ev,et,cmp); // 设定第i队列的一个离开事件并插入事件表}//if}//CustomerArrivedStatus GetHead(LinkQueue Q,QElemType &e){ // 若队列不空,则用e返回Q的队头元素,并返回OK,否则返回ERRORQueuePtr p;if(Q.front==Q.rear)return ERROR;p=Q.front->next;e=p->data;return OK;}//GetHeadPosition GetHead(LinkList L){ // 返回线性链表L中头结点的位置return L.head;}//GetHeadStatus QueueEmpty(LinkQueue Q){ // 若Q为空队列,则返回TRUE,否则返回FALSEif(Q.front==Q.rear)return TRUE;elsereturn FALSE;}//QueueEmptyvoid CustomerDeparture(){ // 处理客户离开事件，en.NType<Quint i;DeQueue(q[i],customer);TotalTime+=en.OccurTime-customer.ArrivalTime;if(!QueueEmpty(q[i])) //设定第i队列的一个离开事件，并插入事件表{GetHead(q[i],customer);et.OccurTime=en.OccurTime+customer.Duration;et.NType=i;OrderInsert(ev,et,cmp);}//if}//CustomerDepartureStatus ListEmpty(LinkList L){ // 若线性链表L为空表，则返回TRUE，否则返回FALSEif(L.len)return FALSE;elsereturn TRUE;}//ListEmptyStatus DelFirst(LinkList &L,Link h,Link &q) // 形参增加L,因为需修改L{ // h指向L的一个结点，把h当做头结点，删除链表中的第一个结点并以q返回。