vb.net先进先出 java 先进先出和先进后出

数据结构C银行模拟问题,高分求助/*bank_sim.h*/
#ifndef BANK_SIM_H
#define BANK_SIM_H
#include stddef.h
#define COUNTER8/* 银行共有 8 个营业窗口 */
#define ARRIVALCOUNTER/* 客户到达事件 */
typedef struct {
size_t OccurTime, NType; /* 事件发生时刻;事件类型 */
} Event; /* 链表数据元素类型 */
typedef struct Enode {
Event event;
struct Enode *next;
} Enode, *EventList;
typedef struct {
size_t ArrTime, Duration;/* 到达时刻;办理时间 */
} QElem;/* 队列数据元素类型 */
typedef struct Qnode {
QElem Cust;/* 客户记录 */
struct Qnode *next;
} Qnode, *Qptr;
typedef struct {
Qptr front, rear; /* 队头指针,队尾指针 */
} LinkQueue;
int bank_open( void );/* 初始化操作 */
int CustArr( void );/* 处理客户到达事件 */
int CustDepart( void );/* 处理客户离开事件 */
void DelFirst( void );/* 删除事件表第一个节点,并把值赋给en */
int DeQueue( LinkQueue * );/* 出队 */
void DestroyAll( void );/* 销毁链表和队列 */
void DestroyList( EventList ); /* 销毁链表 */
void DestroyQueue( LinkQueue * ); /* 销毁队列 */
int EnQueue( LinkQueue *, QElem );/* 进队 */
EventList InitList( void ); /* 创建链表 */
int InitQueue( LinkQueue * ); /* 建立空队列 */
size_t Minimun( void );/* 求长度最短队列 */
int OrderInsert( EventList, Event ); /* 插入事件表 */
size_t QueueLength( LinkQueue );/* 计算队列长度 */
#endif
/////////////////
/*bank_sim.c*/
#include stddef.h
#include stdio.h
#include stdlib.h
#include time.h
#include "../header/bank_sim.h"
#define CLOSETIME480/* 每天工作 8 小时( 60 * 8 = 480 ) */
#define MAX_TIME30/* 事务处理时间不超过 30 分钟 */
#define INTERVAL5/* 每 5 分钟至少来一位客人 */
EventList ev;/* 事件表 */
Event en;/* 事件 */
LinkQueue q[COUNTER];/* 客户队列 */
QElem customer;/* 客户记录 */
size_t TotalTime, CustNum;/* 累计客户逗留时间,客户数 */
/* Begin of bank_open 05-9-17 00:40 */
int bank_open( void )/* 初始化操作 */
{
size_t i;
srand()( time(NULL) );/* 生成随机数种子 */
CustNum = TotalTime = 0;/* 初始化累计时间和客户数 */
if ( !( ev = InitList() ) ) {/* 初始化事件链表 */
return 0;/* 创建失败,返回 0 */
}
en.OccurTime = 0;
en.NType = ARRIVAL;/* 设定第一个客户到达事件 */
if ( !OrderInsert(ev, en) ) {/* 插入事件表 */
DestroyList( ev );
return 0;/* 插入失败,返回0 */
}
for ( i = 0; iCOUNTER;i ) {/* 置空队列 */
if ( !InitQueue(q[i]) ) {
DestroyList( ev );
for ( i = 0; q[i].front;i ) {
DestroyQueue( q[i] );
}
return 0;/* 创建队列失败 , 返回 0 */
}
}
return 1;
} /* End of bank_open */
/* Begin of CustArr 05-9-17 08:20 */
int CustArr( void ) /* 处理客户到达事件 */
{
int durtime, intertime;
QElem e;
size_t i;
CustNum;
/* 生成随机数 */
durtime = rand()() / (RAND_MAX / MAX_TIME1)1; /* 事务处理时间不超过 MAX_TIME 分钟 */
intertime = rand()() / (RAND_MAX / INTERVAL); /* INTERVAL 分钟内有一位客人到达银行,0 表示客户同时到达 */
e.ArrTime = en.OccurTime;
e.Duration = durtime;
en.OccurTime= intertime;/* 下一客户到达时间 */
if ( en.OccurTimeCLOSETIME ) {/* 银行尚未关门 , 插入事件表 */
if ( !OrderInsert(ev, en) ) {/* 插入失败 */
DestroyAll();
return 0;
}
}
i = Minimun();/* 求长度最短队列 */
if ( !EnQueue(q[i], e) ) {
DestroyAll();
return 0;
}
/* 如果此时 i 号窗口只有一位顾客,则马上把他的离开事件插入事件表 */
if ( QueueLength(q[i]) == 1 ) {
en.NType = i;
en.OccurTime = e.ArrTimedurtime;
if ( !OrderInsert(ev, en) ) {
DestroyAll();
return 0;
}
}
return 1;
} /* End of CustArr */
/* Begin of CustDepart 05-9-17 09:00 */
int CustDepart( void ) /* 处理客户离开事件 */
{
Qptr tmp;
size_t i = en.NType;
if ( !DeQueue( q[i] ) ) {/* 删除排头客户 */
DestroyAll();
return 0;
}
TotalTime = TotalTimeen.OccurTime - customer.ArrTime; /* 累计逗留时间 */
if ( q[i].front != q[i].rear ) {
tmp = q[i].front-next;
customer = tmp-Cust;
en.OccurTime= customer.Duration;
if ( !OrderInsert(ev, en) ) {
DestroyAll();
return 0;
}
}
return 1;
}/* End of CustDepart */
/* Begin of DelFirst 05-9-17 00:45 */
void DelFirst( void )/* 删除事件表第一个节点,并把值赋给en */
{
EventList tmp = ev-next;
ev-next = tmp-next;
en = tmp-event;
free(tmp);
} /* End of DelFirst */
/* Begin of DeQueue 05-9-17 08:35 */
int DeQueue(LinkQueue *Q)/* 出队 */
{
Qptr tmp;
if ( Q-front == Q-rear ) {
return 0;/* 如果队列已空,返回 0 */
}
tmp = Q-front-next;
customer = tmp-Cust;
Q-front-next = tmp-next;
if ( Q-rear == tmp ) {/* 如果队尾元素被删除,则队尾指针要指向头结点 */
Q-rear = Q-front;
}
free(tmp);
return 1;
}/* End of DeQueue */
/* Begin of DestroyAll 05-9-17 01:15 */
void DestroyAll( void )/* 销毁链表和队列 */
{
size_t i;
DestroyList( ev );
for ( i = 0; iCOUNTER;i ) {
DestroyQueue( q[i] );
}
} /* End of DestroyAll */
/* Begin of DestroyList 05-9-16 23:00 */
void DestroyList( EventList L ) /* 销毁链表 */
{
EventList T = L;
for ( L = L-next; L; T = L, L = L-next ) {
free( T );
}
free( T );
} /* End of DestroyList */
/* Begin of DestroyQueue 05-9-17 00:30 */
void DestroyQueue(LinkQueue *Q) /* 销毁队列 */
{
while ( Q-front ) {
Q-rear = Q-front-next;
free( Q-front );
Q-front = Q-rear;
}
} /* End of DestroyQueue */
/* Begin of EnQueue 05-9-17 01:20 */
int EnQueue(LinkQueue *Q, QElem e)/* 进队 */
{
Qptr tmp = malloc( sizeof *tmp );
if ( !tmp ) {
return 0; /* 进队失败,返回 0 */
}
tmp-Cust = e;
tmp-next = NULL;
Q-rear-next = tmp;
Q-rear = tmp;
return 1;
} /* End of EnQueue */
/* Begin of InitList 05-9-16 22:30 */
EventList InitList( void )/* 创建链表 */
{
EventList h;
if ( !( h = malloc(sizeof *h) ) ) {/* 创建失败,返回 NULL */
return NULL;
}
h-next = NULL;
return h;
} /* End of InitList */
/* Begin of InitQueue 05-9-16 22:00 */
int InitQueue(LinkQueue *Q)/* 建立空队列 */
{
Q-rear = Q-front = malloc( sizeof *Q-front );
if ( !Q-front ) {/* 创建失败 , 返回 0 */
return 0;
}
Q-front-next = NULL;
return 1;
} /* End of InitQueue */
/* Begin of Minimun 05-9-17 01:05 */
size_t Minimun( void )/* 求长度最短队列 */
{
size_t h = 0, i, j, k;
j = QueueLength(q[0]);
for ( i = 1; iCOUNTER;i ) {
k = QueueLength(q[i]);
if ( jk ) {
j = k;
h = i;
}
}
return h;
} /* End of Minimun */
/* Begin of OrderInsert 05-9-16 23:15 */
int OrderInsert(EventList ev, Event a)/* 插入事件表 */
{
EventList tmp, h = ev, e = ev-next;
if ( !( tmp = InitList() ) ) {/* 分配空间失败,返回 0 */
return 0;
}
/* 插入 */
tmp-event = a;
while ( e(a.OccurTimee-event.OccurTime) ) {
h = e;
e = e-next;
}
h-next = tmp;
tmp-next = e;
return 1;
} /* End of OrderInsert */
/* Begin of QueueLength 05-9-17 01:00 */
size_t QueueLength(LinkQueue Q) /* 计算队列长度 */
{
size_t i;
for ( i = 0; Q.front-next;i ) {
Q.front = Q.front-next;
}
return i;
} /* End of QueueLength */
/////////////////////
/*main.c*/
#include stdio.h
#include stdlib.h
#include "header/bank_sim.h"
extern EventList ev;/* 事件表 */
extern Event en;/* 事件 */
extern size_t TotalTime, CustNum;/* 累计客户逗留时间,客户数 */
int main( void )
{
if ( !bank_open() ) {
return EXIT_FAILURE;/* 初始化失败,退出 */
}
while ( ev-next ) {
DelFirst();/* 删除事件表第一个节点,并把值赋给en */
if ( en.NType == ARRIVAL ) {
if ( !CustArr() ) {
return EXIT_FAILURE;
}
} else if ( !CustDepart() ) {
return EXIT_FAILURE;
}
}
printf( "Average Stay Timevb.net先进先出:%.2f minutes\n", (float)TotalTime / CustNum );
puts( "Press ENTER to quit..." );
getchar()();
DestroyAll();
return EXIT_SUCCESS;
}
参考以下内容vb.net先进先出:
vb.net中如何设置进程的基本优先级下面的代码示例说明了更改线程优先级的结果 。创建两个线程,其中一个线程的优先级设置为 BelowNormal 。两个线程在 while 循环中都增加一个变量 , 并运行一段设定的时间 。
Option Explicit
Option Strict
Imports System
Imports System.Threading
Public Class Test
MTAThread _
Shared Sub Main()
Dim priorityTest As New PriorityTest()
Dim threadOne As Thread = _
New Thread(AddressOf priorityTest.ThreadMethod)
threadOne.Name = "ThreadOne"
Dim threadTwo As Thread = _
New Thread(AddressOf priorityTest.ThreadMethod)
threadTwo.Name = "ThreadTwo"
threadTwo.Priority = ThreadPriority.BelowNormal
threadOne.Start()
threadTwo.Start()
' Allow counting for 10 seconds.
Thread.Sleep(10000)
priorityTest.LoopSwitch = False
End Sub
End Class
Public Class PriorityTest
Dim loopSwitchValue As Boolean
Sub New()
loopSwitchValue = https://www.04ip.com/post/True
End Sub
WriteOnly Property LoopSwitch As Boolean
Set
loopSwitchValue = https://www.04ip.com/post/Value
End Set
End Property
Sub ThreadMethod()
Dim threadCount As Long = 0
While loopSwitchValue
threadCount= 1
End While
Console.WriteLine("{0} with {1,11} priority "_
"has a count = {2,13}", Thread.CurrentThread.Name, _
Thread.CurrentThread.Priority.ToString(), _
threadCount.ToString("N0"))
End Sub
End Class
求用vbnet 实现先进先出即队列得源代码VB.Net中的队列类在System.Collections.Generic命名空间中,名字叫Queue,是一个泛型类 。
实例化该类:
Dim myQueue As QueueInt32
myQueue = new QueueInt32();
然后可以通过Queue中的Enqueue和Dequeue函数进行入队出队操作:
With myQueue
.Enqueue(1)
.Enqueue(2)
.Enqueue(3)
.Enqueue(4)
.Enqueue(5)
End With
For i = 0 To 5 Step 1
Console.WriteLine(myQueue.Dequeue())
Next i
显示结果:
1
2
3
4
5
【vb.net先进先出 java 先进先出和先进后出】vb.net先进先出的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于java 先进先出和先进后出、vb.net先进先出的信息别忘了在本站进行查找喔 。

    推荐阅读