Автор работы: Пользователь скрыл имя, 04 Ноября 2013 в 17:38, курсовая работа
Компьютерное моделирование — метод решения за¬дачи анализа или синтеза сложной системы на основе использования ее компьютерной модели. Суть компьютер¬ного моделирования заключена в получении количествен¬ных и качественных результатов по имеющейся модели. Качественные выводы, получаемые по результатам ана¬лиза, позволяют обнаружить неизвестные ранее свойства сложной системы: ее структуру, динамику развития, ус¬тойчивость, целостность и др.
Введение 7
1. Постановка задачи моделирования 9
2. Функциональная схема моделирования системы 10
3. Структурная схема модели в символах Q - схем 11
4. Метод построения модели 13
5. Описание GPSS модели обслуживания клиентов банка 14
5.1. Блок-диаграмма модели обслуживания клиентов банка 14
5.2. Описание GPSS программы модели 15
6. Анализ результатов моделирования 17
7. Планирование имитационного эксперимента 18
Заключение 21
Использованная литература 22
Приложение 1. Блок - диаграмма модели 24
Приложение 2. Листинг программы 27
Приложение 3. Листинг результатов работы программы 32
1. ГОСТ 19.101 - 77. ВСПД. Виды
программ и программных
2. ГОСТ 19.103 - 77. ЕСПД. Обозначение программ и программных документов. - М.: Изд-во стандартов, 1977.
3. ГОСТ 19.401 - 78. ЕСПД. Текст
программы. Требования к
4. ГОСТ 19.402 - 78. ЕСПД. Описание программы. - М.: Изд-во стандартов, 1978.
5. ГОСТ 19.505 - 79. ЕСПД, Руководство
оператора. Требования к
6. ГОСТ 19.701 - 90. НСПД. Схемы алгоритмов, программ, данных и систем. Условные обозначения и правила выполнения. - М.: Изд-во стандартов. - 1990.
7. Бусленко Н.П. Моделирование сложных систем. - М.: Наука, 1978.
8. Советов Б.Я., Яковлев С.А. Моделирование систем. - М.: Высшая школа, 2001
9. Советов Б.Я., Яковлев С.А. Моделирование систем. Курсовое проектирование: учебное пособие для вузов по специальности АСУ. - М.: Высшая школа,1988.
10. Советов Б.Я., Яковлев С.А. Моделирование систем: Лабораторный практикум. - М.: Высшая школа,1989.
11. Шрайбер Т. Дж.. Моделирование на GPSS. Пер. с англ. - М.: Машиностроение, 1980
12. Емельянов А.А. и др. Имитационное моделирование экономических процессов. Учеб. Пособие / А.А. Емельянов, Е.А. Власова, Р.В. Дума. Под ред. А.А. Емельянова. - М.: Финансы и статистика, 1988.
13. Бершадская Е.Г. Моделирование.
14. Шеннон Р. Имитационное моделирование систем - искусство и наука: Пер. с англ. - М.: Мир, 1978
15. Максимей И.В. Имитационное моделирование на ЭВМ. - М.: Радио и связь, 1988
; Модель обслуживания клиентов банка. Вариант без дополнения 6-8-1
; Количество сотрудников 2
GENERATE 2.5,0.5
QUEUE 1 ; Занять очередь
TEST L Q1,10,POKI
TRANSFER ALL,SOT1,SOT2,5 ; Сотрудники 1…2 через 5 блоков
SOT1 SEIZE 1 ; Занять 1-го сотрудника
DEPART 1 ; Освободить очередь
ADVANCE 1.7,0.5 ;Обслуживание
RELEASE 1 ; Освободить сотрудника
TRANSFER ,KAS_L ; К кассиру
SOT2 SEIZE 2
DEPART 1
ADVANCE 1.7,0.5
RELEASE 2
TRANSFER ,KAS_L
SOT3 SEIZE 3
DEPART 1
ADVANCE 1.7,0.5
RELEASE 3
TRANSFER ,KAS_L
SOT4 SEIZE 4
DEPART 1
ADVANCE 1.7,0.5
RELEASE 4
TRANSFER ,KAS_L
SOT5 SEIZE 5
DEPART 1
ADVANCE 1.7,0.5
RELEASE 5
TRANSFER ,KAS_L
SOT6 SEIZE 6
DEPART 1
ADVANCE 1.7,0.5
RELEASE 6
KAS_L QUEUE KAS ; Занять очередь к кассиру
SEIZE KAS
DEPART KAS
ADVANCE (1.7/2.5),(0.5/2.5)
RELEASE KAS
TRANSFER ,OBSL
OBSL SAVEVALUE OBS+,1
VIHOD TERMINATE
POKI TRANSFER ,VIHOD
GENERATE 480 ; 1 рабочий день = 8 часов * 60 минут
TERMINATE 1
START 3
; Модель обслуживания клиентов банка.
Вариант PLUS 6-8-1P
Nsotr EQU 2 ; Количество сотрудников 2, 4, 6
PROCEDURE SQmin() Begin
IF ((Q1+Q2+Q3+Q4+Q5+Q6)=10) THEN RETURN (POKI);
IF ((Q1<=Q2)&(Q1<=Q3)&(Q1<=Q4)&(
IF ((Q2<=Q3)&(Q2<=Q4)&(Q2<=Q5)&(
IF ((Q3<=Q4)&(Q3<=Q5)&(Q3<=Q6)) THEN RETURN (SOT3);
IF ((Q4<=Q5)&(Q4<=Q6)) THEN RETURN (SOT4);
IF (Q5<=Q6) THEN RETURN (SOT5);
RETURN (SOT6);
End;
GENERATE 2.5,0.5
TRANSFER ,(SQmin())
SOT1 QUEUE 1 ; Занять очередь к сотруднику 1
SEIZE 1 ; Занять 1-го сотрудника
DEPART 1 ; Освободить очередь
ADVANCE 1.7,0.5 ;Обслуживание
RELEASE 1 ; Освободить сотрудника
TRANSFER ,KAS_L ; К кассиру
SOT2 QUEUE 2
SEIZE 2
DEPART 2
ADVANCE 1.7,0.5
RELEASE 2
TRANSFER ,KAS_L
SOT3 QUEUE 3
SEIZE 3
DEPART 3
ADVANCE 1.7,0.5
RELEASE 3
TRANSFER ,KAS_L
SOT4 QUEUE 4
SEIZE 4
DEPART 4
ADVANCE 1.7,0.5
RELEASE 4
TRANSFER ,KAS_L
SOT5 QUEUE 5
SEIZE 5
DEPART 5
ADVANCE 1.7,0.5
RELEASE 5
TRANSFER ,KAS_L
SOT6 QUEUE 6
SEIZE 6
DEPART 6
ADVANCE 1.7,0.5
RELEASE 6
KAS_L TEST L Q$KAS,10
QUEUE KAS ; Занять очередь к кассиру
SEIZE KAS
DEPART KAS
ADVANCE (1.7/2.5),(0.5/2.5)
RELEASE KAS
TRANSFER ,OBSL
OBSL SAVEVALUE OBS+,1
VIHOD TERMINATE
POKI TRANSFER ,VIHOD
GENERATE 480 ; 1 рабочий день = 8 часов * 60 минут
TERMINATE 1
START 3
; Модель обслуживания клиентов банка. Вариант PLUS 6-8-2P
Nsotr EQU 4 ; Количество сотрудников 2, 4, 6
PROCEDURE SQmin() Begin
IF ((Q1+Q2+Q3+Q4+Q5+Q6)=10) THEN RETURN (POKI);
IF ((Q1<=Q2)&(Q1<=Q3)&(Q1<=Q4)&(
IF ((Q2<=Q3)&(Q2<=Q4)&(Q2<=Q5)&(
IF ((Q3<=Q4)&(Q3<=Q5)&(Q3<=Q6)) THEN RETURN (SOT3);
IF ((Q4<=Q5)&(Q4<=Q6)) THEN RETURN (SOT4);
IF (Q5<=Q6) THEN RETURN (SOT5);
RETURN (SOT6);
End;
GENERATE 2.5,0.5
TRANSFER ,(SQmin())
SOT1 QUEUE 1 ; Занять очередь к сотруднику 1
SEIZE 1 ; Занять 1-го сотрудника
DEPART 1 ; Освободить очередь
ADVANCE 1.7,0.5 ;Обслуживание
RELEASE 1 ; Освободить сотрудника
TRANSFER ,KAS_L ; К кассиру
SOT2 QUEUE 2
SEIZE 2
DEPART 2
ADVANCE 1.7,0.5
RELEASE 2
TRANSFER ,KAS_L
SOT3 QUEUE 3
SEIZE 3
DEPART 3
ADVANCE 1.7,0.5
RELEASE 3
TRANSFER ,KAS_L
SOT4 QUEUE 4
SEIZE 4
DEPART 4
ADVANCE 1.7,0.5
RELEASE 4
TRANSFER ,KAS_L
SOT5 QUEUE 5
SEIZE 5
DEPART 5
ADVANCE 1.7,0.5
RELEASE 5
TRANSFER ,KAS_L
SOT6 QUEUE 6
SEIZE 6
DEPART 6
ADVANCE 1.7,0.5
RELEASE 6
KAS_L TEST L Q$KAS,10
QUEUE KAS ; Занять очередь к кассиру
SEIZE KAS
DEPART KAS
ADVANCE (1.7/2.5),(0.5/2.5)
RELEASE KAS
TRANSFER ,OBSL
OBSL SAVEVALUE OBS+,1
VIHOD TERMINATE
POKI TRANSFER ,VIHOD
GENERATE 480 ; 1 рабочий день = 8 часов * 60 минут
TERMINATE 1
START 3
; Модель обслуживания клиентов банка. Вариант PLUS 6-8-3P
Nsotr EQU 6 ; Количество сотрудников 2, 4, 6
PROCEDURE SQmin() Begin
IF ((Q1+Q2+Q3+Q4+Q5+Q6)=10) THEN RETURN (POKI);
IF ((Q1<=Q2)&(Q1<=Q3)&(Q1<=Q4)&(
IF ((Q2<=Q3)&(Q2<=Q4)&(Q2<=Q5)&(
IF ((Q3<=Q4)&(Q3<=Q5)&(Q3<=Q6)) THEN RETURN (SOT3);
IF ((Q4<=Q5)&(Q4<=Q6)) THEN RETURN (SOT4);
IF (Q5<=Q6) THEN RETURN (SOT5);
RETURN (SOT6);
End;
GENERATE 2.5,0.5
TRANSFER ,(SQmin())
SOT1 QUEUE 1 ; Занять очередь к сотруднику 1
SEIZE 1 ; Занять 1-го сотрудника
DEPART 1 ; Освободить очередь
ADVANCE 1.7,0.5 ;Обслуживание
RELEASE 1 ; Освободить сотрудника
TRANSFER ,KAS_L ; К кассиру
SOT2 QUEUE 2
SEIZE 2
DEPART 2
ADVANCE 1.7,0.5
RELEASE 2
TRANSFER ,KAS_L
SOT3 QUEUE 3
SEIZE 3
DEPART 3
ADVANCE 1.7,0.5
RELEASE 3
TRANSFER ,KAS_L
SOT4 QUEUE 4
SEIZE 4
DEPART 4
ADVANCE 1.7,0.5
RELEASE 4
TRANSFER ,KAS_L
SOT5 QUEUE 5
SEIZE 5
DEPART 5
ADVANCE 1.7,0.5
RELEASE 5
TRANSFER ,KAS_L
SOT6 QUEUE 6
SEIZE 6
DEPART 6
ADVANCE 1.7,0.5
RELEASE 6
KAS_L TEST L Q$KAS,10
QUEUE KAS ; Занять очередь к кассиру
SEIZE KAS
DEPART KAS
ADVANCE (1.7/2.5),(0.5/2.5)
RELEASE KAS
TRANSFER ,OBSL
OBSL SAVEVALUE OBS+,1
VIHOD TERMINATE
POKI TRANSFER ,VIHOD
GENERATE 480 ; 1 рабочий день = 8 часов * 60 минут
TERMINATE 1
START 3
Программа компьютерного эксперимента
; Модель обслуживания клиентов банка. Вариант PLUS 6-8-ЭКСП
Nsotr EQU 3 ; Количество сотрудников X1 = 3 (-) или 5 (+)
Msr EQU 0.4 ; Интервал прихода клиентов X2 = 0,4 (-) или 0,45 (+)
Obslu EQU 1.9 ; Интервал обслуживания X3 = 1,5 (-) или 1,9 (+)
PROCEDURE SQmin() Begin
IF ((Q1+Q2+Q3+Q4+Q5)=10) THEN RETURN (POKI);
IF ((Q1<=Q2)&(Q1<=Q3)&(Nsotr=3)|
(Q1<=Q2)&(Q1<=Q3)&(Q1<=Q4)&(
IF ((Q2<=Q3)&(Nsotr=3)|
(Q2<=Q3)&(Q2<=Q4)&(Q2<=Q5)&(
IF (Nsotr=3) THEN RETURN (SOT3);
IF (Q4<=Q5) THEN RETURN (SOT4);
RETURN (SOT5);
End;
GENERATE Msr,(Msr/3.4)
SAVEVALUE ASIGNA," - - + " ; Сигнатура варианта
SAVEVALUE Nsotru,Nsotr
SAVEVALUE Msred,Msr
SAVEVALUE Obsluz,Obslu
TRANSFER ,(SQmin())
SOT1 QUEUE 1 ; Занять очередь к сотруднику 1
SEIZE 1 ; Занять 1-го сотрудника
DEPART 1 ; Освободить очередь
ADVANCE Obslu,0.5 ;Обслуживание
RELEASE 1 ; Освободить сотрудника
TRANSFER ,KAS_L ; К кассиру
SOT2 QUEUE 2
SEIZE 2
DEPART 2
ADVANCE Obslu,0.5
RELEASE 2
TRANSFER ,KAS_L
SOT3 QUEUE 3
SEIZE 3
DEPART 3
ADVANCE Obslu,0.5
RELEASE 3
TRANSFER ,KAS_L
SOT4 QUEUE 4
SEIZE 4
DEPART 4
ADVANCE Obslu,0.5
RELEASE 4
TRANSFER ,KAS_L
SOT5 QUEUE 5
SEIZE 5
DEPART 5
ADVANCE Obslu,0.5
RELEASE 5
KAS_L TEST L Q$KAS,10,STK_L
QUEUE KAS ; Занять очередь к кассиру
SEIZE KAS
DEPART KAS
ADVANCE (Obslu/2.5),(0.5/2.5)
RELEASE KAS
TRANSFER ,OBSL
STK_L QUEUE STK
SEIZE STK
DEPART STK
ADVANCE (Obslu/2.5/1.3),(0.5/2.5/1.3)
RELEASE STK
OBSL SAVEVALUE OBS+,1
VIHOD TERMINATE
POKI SAVEVALUE POKINN+,1
TRANSFER ,VIHOD
GENERATE 480 ; 1 рабочий день = 8 часов * 60 минут
TERMINATE 1
START 3
Вариант без дополнения
GPSS World Simulation Report - 6-8-1.1.1
Wednesday, November 24, 2010 11:11:39
START TIME END TIME BLOCKS FACILITIES STORAGES
0.000 1440.000 44 3 0
NAME VALUE
KAS 10000.000
KAS_L 34.000
OBS 10001.000
OBSL 40.000
POKI 42.000
SOT1
SOT2 10.000
SOT3 15.000
SOT4 20.000
SOT5 25.000
SOT6 30.000
VIHOD 41.000
LABEL LOC BLOCK TYPE ENTRY COUNT CURRENT COUNT RETRY
1 GENERATE 579 0 0
2 QUEUE 579 0 0
3 TEST 579 0 0
4 TRANSFER 579 0 0
SOT1 5 SEIZE 566 0 0
6 DEPART 566 0 0
7 ADVANCE 566 1 0
8 RELEASE 565 0 0
9 TRANSFER 565 0 0
SOT2 10 SEIZE 13 0 0
11 DEPART 13 0 0
12 ADVANCE 13 0 0
13 RELEASE 13 0 0
14 TRANSFER 13 0 0
SOT3 15 SEIZE 0 0 0
16 DEPART 0 0 0
17 ADVANCE 0 0 0
18 RELEASE 0 0 0
19 TRANSFER 0 0 0
SOT4 20 SEIZE 0 0 0
21 DEPART 0 0 0
22 ADVANCE 0 0 0
23 RELEASE 0 0 0
24 TRANSFER 0 0 0
SOT5 25 SEIZE 0 0 0
26 DEPART 0 0 0
27 ADVANCE 0 0 0
28 RELEASE 0 0 0
29 TRANSFER 0 0 0
Информация о работе Имитационное моделирование работы системы обслуживания клиентов банка