comment Описать систему моделирующую работу банка;
comment Есть поток простых клиентов приходящих через интервалы времени распределённого;
comment по экспоненциальному закону с матожиданием 5 минут;
comment Через интервалы времени распределённые по равномерному закону [5,20] приходят;
comment вип клиенты которые должны быть обслужены вне очереди.
comment Обслуживание одного клиента занимает время распределённое нормально;
comment с матожиданием 5 минут и дисперсией 3;
comment В банке работают 3 кассира;
comment Определить всё что можно;
begin
integer U1, U2, U3, N, Day;
real TMOD;
integer C_C;
U1:=5;
U2:=7;
U3:=11;
TMOD:=480;
C_C:=3;
N:=2;
for Day:=1 step 1 until N do
simulation
begin
ref(HEAD) queue;
ref(CASSIR) array CASSA(1:C_C);
integer array COUNT_CLIENTS(0:1);
integer CLIENTS_NUM;
integer I;
comment TYPE - тип клиента 0-простой, 1-вип;
process class CUSTOMER(TYPE);
integer TYPE;
begin
real T_IN;
integer I;
T_IN:=TIME;
into(queue);
for I:=1 step 1 until C_C do activate CASSA(I);
passivate;
comment Здесь считаем статистику по клиентам;
CLIENTS_NUM:=CLIENTS_NUM+1;
end;
process class CASSIR;
begin
real ALL_T_NOT_W, T_START_N_W;
real TIME_SERVICE;
integer count_customer_common, count_customer_vip;
ref(CUSTOMER) C;
ALL_T_NOT_W:=0;
count_customer_common:=0;
count_customer_vip:=0;
work:
C:-queue.first;
if C=/=NONE then
begin
C.out;
calc_time2:
TIME_SERVICE:=normal(5, 3, U1);
if TIME_SERVICE<0 then goto calc_time2;
hold(TIME_SERVICE);
activate C;
end
else
begin
T_START_N_W:=TIME;
passivate;
ALL_T_NOT_W:=ALL_T_NOT_W+TIME-T_START_N_W;
end;
goto work;
end;
process class GENERATOR(TYPE);
integer TYPE;
begin
real interval;
create:
if TYPE=0 then
begin
interval:=negexp(1.0/5.0, U2);
end
else
begin
interval:=uniform(5, 20, U3);
end;
activate new CUSTOMER(TYPE);
hold(interval);
goto create;
end;
CLIENTS_NUM:=0;
queue:-new HEAD;
for I:=1 step 1 until C_C do
begin
CASSA(I):-new CASSIR;
activate CASSA(I);
end;
activate new GENERATOR(0);
activate new GENERATOR(1);
hold(TMOD);
for I:=1 step 1 until C_C do
begin
activate CASSA(I);
end;
outtext("Clients number ");
outtext(" = ");
outint(CLIENTS_NUM, 5);
outimage;
for I:=1 step 1 until C_C do
begin
outtext("Loading cassir ");
outint(I, 2);
outtext(" = ");
outfix( (1.0 - CASSA(I).ALL_T_NOT_W/TMOD) *100 , 2, 6);
outtext("%");
outimage;
end;
outtext("=============END==OF==THE=DAY==");
outint(Day, 1);
outtext("===========");
outimage;
end;
end.
About Online Simula Compiler
Try our Online Simula Compiler (Version Cim v3.37) to Edit, Run, and Share your Simula Code directly from your browser. This online development environment provides you the latest version Cim v3.37.
How to use Online Simula Compiler?
Write and Execute Code
- Write your program (or, paste it) directly under the "Source Code" tab.
- If you want to save your program, go to the "Project" menu and save it.
- You can directly execute your program without saving it by clicking on on "Execute" button.
User Input
The latest version of Coding Ground allows to provide program input at run time from the termnial window exactly the same way as you run your program at your own computer. So simply run a program and provide your program input (if any) from the terminal window available in the right side.
Online Simula Compiler: Keyboard Shortcuts
The following are the keyword shortcut of this Online Simula Compiler:
Shortcut | Description |
⌘ + Enter | Run the program |
⌘ + S | Save Project (Login Required) |
⇧ + ⌘ + S | Save As Project |
⌘ + P | New Project |
⌘ + G | Share Project |
⌘ + Z | Undo Editing |
⌘ + Y | Redo Editing |
⌘ + A | Select All Text |
⌘ + X | Cut Selected Text |
⌘ + C | Copy Selected Text |
⌘ + V | Paste Copied Text |
⌘ + F | Search Text |
⌘ + ⌥ + F | Replace Text |
Shortcut | Description |
Ctrl + Enter | Run the program |
Ctrl + S | Save Project |
Shift + Ctrl + S | Save As Project |
Ctrl + G | Share Project |
Ctrl + Z | Undo Editing |
Ctrl + Y | Redo Editing |
Ctrl + A | Select All Text |
Ctrl + X | Cut Selected Text |
Ctrl + C | Copy Selected Text |
Ctrl + V | Paste Copied Text |
Ctrl + F | Search Text |
Ctrl + H | Replace Text |
Online Simula Compiler: Save and Share Simula Code (Project)
Save Simula Project Online
You can save your Simula Project with us so that you can access this project later on. To save a project you will need to create a login Id with us. So before you save a project, please create a login Id using a link given at the top right corner of this page.
Share Simula Project Online
You can use this feature to share your Simula Code with your teachers, classmates and colleagues. Just click Share Button and it will create a short link, which can be shared through Email, WhatsApp or even through Social Media. A shared link will be deleted if it has been passive for almost 3 months.
More Features of Online Simula Compiler
- Theme – You can change the current editor's theme from the "Editor Theme" option under "Settings" menu.
- Font Size – You can change the font size of the editor /compiler from from the "Font Size" option under "Settings" menu.
- Tab Size – You can change the tab size from the "Tab Size" option under "Settings" Menu.
- Show/Hide Line Numbers – You can show/hide the line number with the code from the "Show Line Numbers" or "Hide Line Numbers" option under "Settings" Menu.
- And, many more.
Benefits of Using Online Simula Compiler
There are several benefits of using the Online Simula Compiler to run your Simula code:
- Platform independence: You can run your code from any device without taking care of operating systems.
- Convenience: You don't need to install anything for using this.
- No setup required: There is no need for additional setup to run your code.
- Updated version: Our online compiler/editors/terminals are the latest up-to-date.