на тему рефераты Информационно-образоательный портал
Рефераты, курсовые, дипломы, научные работы,
на тему рефераты
на тему рефераты
МЕНЮ|
на тему рефераты
поиск
Разработка имитационной модели системы массового обслуживания
ринимаем жесткий диск IC25N020ATMR04 емкостью 20 Гб, с частотой вращения 4200об/мин, средним временем поиска 12 мс. Эти значения являются следствием разумного компромисса между производительностью и стоимостью.

2.7.8 Клавиатура

Особых
требований к клавиатуре нет, выбираем стандартную клавиатуру со 101 клавишей с разъёмом PS/2 (Genius Comfy KB-10X).

2.7.9 Мышь

Мышь
- это манипулятор для компьютера. Выбираем мышь по параметрам цены и качества, которым соответствуют мыши Genius NetScroll+PS/2.

3. Практическая часть

3.1 Выбор среды разработки программирования

В качестве внутреннего языка для данной работы был выбран ObjectPascal, который используется в среде программирования Delphi. Этот язык использует принципы объектно-ориентированного и визуального программирования.

Язык ObjectPascal является одним из высокоразвитых языков объектно-ориентированного программирования. И среди других, например, таких как Visual Basic или Visual C++, отличается простотой программного кода, достаточным количеством литературы по этому языку.

Объектно-ориентированное программирование (ООП) - это методика разработки программ, в основе которой лежит понятие объект. Объект - это некоторая структура, соответствующая объекту реального мира, его поведению. Задача, решаемая с использованием методики ООП, описывается в терминах объектов и операций над ними, а программа при таком подходе представляет собой набор объектов и связей между ними.

По сравнению с традиционными способами программирования ООП обладает рядом преимуществ. Главное из них заключается в том, что эта концепция в наибольшей степени соответствует внутренней логике функционирования операционной системы (ОС) Windows. Программа, состоящая из отдельных объектов, отлично приспособлена к реагированию на события, происходящие в ОС. К другим преимуществам ООП можно отнести большую надежность кода и возможность повторного использования отработанных объектов.

Delphi - это комбинация нескольких важнейших технологий:

Высокопроизводительный компилятор в машинный код

Объектно-ориентированная модель компонент

Визуальное (а, следовательно, и скоростное) построение приложений из программных прототипов

Масштабируемые средства для построения баз данных

Программирование в Delphi строится на тесном взаимодействии двух процессов:

*процесса конструирования визуального проявления программы (т.е. ее Windows-окна),

*процесса написания кода, придающего элементам этого окна и программе в целом необходимую функциональность.

Основные преимущества среды программирования Delphi:

Простота языка позволяет быстро его освоить и создавать сложные программы;

Развитые средства представления структур данных обеспечивают удобство работы, как с числовой, так и с символьной и битовой информацией;

Объектно-ориентированное программирование (ООП) в визуальной среде.

В процессе построения приложения разработчик выбирает из палитры компонент готовые компоненты как художник, делающий крупные мазки кистью. Еще до компиляции он видит результаты своей работы - после подключения к источнику данных их можно видеть отображенными на форме, можно перемещаться по данным, представлять их в том или ином виде. В этом смысле проектирование в Delphi мало чем отличается от проектирования в интерпретирующей среде, однако после выполнения компиляции мы получаем код, который исполняется в 10-20 раз быстрее, чем то же самое, сделанное при помощи интерпретатора. Кроме того, компилятор компилятору рознь, в Delphi компиляция производится непосредственно в родной машинный код, в то время как существуют компиляторы, превращающие программу в так называемый p-код, который затем интерпретируется виртуальной p-машиной. Это не может не сказаться на фактическом быстродействии готового приложения.

Основной упор этой модели в Delphi делается на максимальном реиспользовании кода. Это позволяет разработчикам строить приложения весьма быстро из заранее подготовленных объектов, а также дает им возможность создавать свои собственные объекты для среды Delphi. Никаких ограничений по типам объектов, которые могут создавать разработчики, не существует.

3.2 Выбор алгоритма решения

Алгоритм моделирования выглядит так:

Устанавливаем начальное время моделирования равное нулю. Счетчики очереди, количества обслуженных, необслуженных и неполностью обслуженных клиентов, равными нулю.

Формируем динамический массив с процедурами, где имеется состояние каждой процедуры, время обслуживания каждой процедуры (выбирается случайно из промежутка времени процедуры), количество обслуженных клиентов по каждой процедуре, время занятости, время простоя. Все данные, кроме времени обслуживания устанавливаются равными нулю.

Формируем время появления первого клиента, для этого случайным образом выбираем момент времени из интервала периодичности клиента и прибавляем к времени начала работы. И формируем динамический массив, куда заносим информацию по всем клиентам (время появления, количество процедур, время по каждой процедуре, номер выполнения текущей процедуры, количество прошедших процедур, состояние, время ожидания в очереди, конечное состояние). Заносим в этот массив первого клиента.

Проверяем, не закончилось ли время моделирования (можно предусмотреть остановку в любой момент по нажатии кнопки "стоп"). Если текущее время становится больше заданного времени моделирования, то закончить работу и вывести отчет по результатам моделирования.

Проверяем, не наступило ли время появления первого клиента. Если нет, значит увеличиваем время простоя всех процедур на единицу, если же клиент не первый смотрится по состоянию процедур и клиентов.

Если наступило время появления последнего клиента, значит, выполняем начало работы.

Смотрим по номеру первой процедуры клиента, свободна она или нет. Если нет, значит смотрим следующую процедуру клиента. Если все процедуры заняты, значит увеличиваем счетчик очереди на единицу, в массив клиентов ко времени ожидания клиента прибавляем единицу.

При этом формируем массив с клиентами, поступившими в очередь. Там содержится информация: время попадания в очередь, номер клиента в массиве с клиентами, информация по процедурам.

Если какая-то процедура клиента свободна, состояние ее приравниваем 1 (означает, что процедура занята). В массив у клиента заносим номер текущей процедуры.

Затем проверяем по массиву клиентов информацию по каждому клиенту. Если у клиента стоит номер текущей процедуры, значит в ячейке, где стоит время данной процедуры у клиента, отнимаем единицу. А у процедуры прибавляем единицу к времени занятости. Смотрим, если у клиента время прохождения процедуры закончилось, состояние процедуры приравниваем к нулю ("Свободна"). К числу обслуженных клиентов в массиве процедуры прибавляем единицу. А у клиента прибавляем количество прошедших процедур и переходим к пункту 6, т.е. опять начало работы. Если все процедуры пройдены, конечное состояние приравниваем 1 (полностью обслужился).

Если у клиента нет номера текущей процедуры и все остальные процедуры заняты, увеличиваем счетчик длины очереди на единицу, а у клиента прибавляем время ожидания на единицу. Смотрим, не превысило ли время ожидания максимального. Если да, смотрим, если ни одной процедуры не пройдено, конечное состояние приравниваем 3 (полностью необслуженные); если хоть одна процедура пройдена, конечное состояние приравниваем 2 (не полностью обслуженные).

Затем проверяем по процедурам, если какая-то освободилась, смотрим, нет ли клиентов для данной процедуры в массиве процедур. Если есть, выбираем всех клиентов по данной процедуре, и выбираем того, у кого меньшее время попадания, т.е. тот, кто раньше попал в очередь; у процедуры состояние приравниваем 1.

Смотрим массив процедур. Те процедуры, у которых состояние равно нулю, время простоя увеличиваем на единицу.

Увеличиваем время на 1 и переходим к п.3. Только если длина очереди равна максимальной длине очереди, значит клиента сразу заносим в число полностью не обслуженных.

3.3 Структура программы

Модуль "Unit2" проекта служит показательной формой при загрузке имитационной модели СМО. Модуль "Unit1" является главным в работе всей программы. Модуль "Unit3" предназначен для вывода справки об авторе.

В программе используются процедуры и функции, которые написаны для удобства работы и понимания программы.

procedure Klientov - Формирование новых клиентов;

procedure FormCreate (Sender: TObject) - Начальные установки при открытии формы;

procedure Timer1Timer (Sender: TObject) - Процедура моделирования;

procedure Button1Click (Sender: TObject) - Кнопка "Пуск";

procedure FormCanResize (Sender: TObject; var NewWidth, NewHeight: Integer; var Resize: Boolean) - Процедура изменения размеров формы;

procedure FormClose (Sender: TObject; var Action: TCloseAction) -Закрытие формы;

procedure BitBtn1Click (Sender: TObject) - Кнопка "Выход";

procedure Button2Click (Sender: TObject) - Кнопка "Остановить";

procedure Edit3Change (Sender: TObject) - Проверка на ошибки основных параметров;

procedure Edit3KeyUp (Sender: TObject; var Key: Word;

Shift: TShiftState) - Проверка на ошибки основных параметров;

procedure Edit8Change (Sender: TObject) - Проверка на ошибки основных параметров;

procedure Edit8KeyPress (Sender: TObject; var Key: Char) - Проверка на ошибки основных параметров;

procedure Edit2KeyPress (Sender: TObject; var Key: Char) - Проверка на ошибки основных параметров;

procedure Edit3KeyPress (Sender: TObject; var Key: Char) - Проверка на ошибки основных параметров;

procedure Edit4KeyPress (Sender: TObject; var Key: Char) - Проверка на ошибки основных параметров;

procedure Edit9KeyPress (Sender: TObject; var Key: Char) - Проверка на ошибки основных параметров;

procedure Edit5KeyPress (Sender: TObject; var Key: Char) - Проверка на ошибки основных параметров;

procedure Edit1KeyPress (Sender: TObject; var Key: Char) - Проверка на ошибки основных параметров;

procedure SpinEdit1Change (Sender: TObject) - Проверка на ошибки основных параметров;

procedure Edit2Change (Sender: TObject) - Проверка на ошибки основных параметров;

procedure Edit4Change (Sender: TObject) - Проверка на ошибки основных параметров;

procedure Edit9Change (Sender: TObject) - Проверка на ошибки основных параметров;

procedure Edit5Change (Sender: TObject) - Проверка на ошибки основных параметров;

procedure N10Click (Sender: TObject) - Выбор вкладки главного меню "Запуск";

procedure N11Click (Sender: TObject- Выбор вкладки главного меню "Остановить";

procedure r1KeyPress (Sender: TObject; var Key: Char) - Проверка на ошибки основных параметров;

procedure N2Click (Sender: TObject) - Выбор вкладки главного меню "Сохранить отчет";

procedure N1Click (Sender: TObject) - Выбор вкладки главного меню "Файл";

procedure N3Click (Sender: TObject) - Выбор вкладки главного меню "Начальные параметры";

procedure N4Click (Sender: TObject) - Выбор вкладки главного меню "Результаты";

procedure N5Click (Sender: TObject) - Выбор вкладки главного меню "Выход";

procedure N12Click (Sender: TObject) - Выбор вкладки главного меню "Очистить параметры";

procedure N13Click (Sender: TObject) - Выбор вкладки главного меню "Показать отчет";

procedure ToolButton1Click (Sender: TObject) - Нажатие на панели инструментов кнопки "Сохранить отчет";

procedure ToolButton2Click (Sender: TObject) - Нажатие на панели инструментов кнопки "Запуск ";

procedureToolButton4Click (Sender: TObject) - Нажатие на панели инструментов кнопки "Очистить параметры ";

procedure ToolButton3Click (Sender: TObject) - Нажатие на панели инструментов кнопки "Справка ";

procedure ToolButton5Click (Sender: TObject) - Нажатие на панели инструментов кнопки "Остановить ";

procedure N6Click (Sender: TObject) - Выбор вкладки главного меню "Моделирование";

procedure BitBtn1Click (Sender: TObject);

procedure N8Click (Sender: TObject) - Выбор вкладки главного меню "О программе";

procedure N9Click (Sender: TObject) - Выбор вкладки главного меню "Помощь";

Ниже приведены глобальные переменные, используемые в программе.

i: integer; // минуты {общее время}

min: integer; // минуты {время моделирования}

chas: integer; // часы

vr_mod: integer; // время моделирования

klienty: array of array of integer; // массив с клиентами

proced: array of array of integer; // массив процедур

nom_pr: array of integer;

klient: integer; // кол-во клиентов

kol_proced: integer; // кол-во процедур

vremya: integer; // время появления каждого клиента

dlina: integer; // длина очереди

obsl: integer; // число обслуженных клиентов

nepol_obsl: integer; // число не полностью обслуженных клиентов

neobsl: integer; // число необслуженных клиентов

proced_kl: integer; // кол-во процедур у каждого клиента

f,j,h,k: integer;

vr_pr: integer;

dopol_och, ochered: array of array of integer; // массив очереди

och_pr: array of array of integer;

maxim, max: integer; // максимальная длина очереди

stop,pusk, dl,x: integer; // счетчики

y,dlina_och2, est,c,q, t,l,null: integer; // счетчики

сlient, minim,pr, b: integer;

s_r, s: string;

na_obsl: integer; // клиенты на обслуживании

dlina_och: integer; // длина очереди

eff_rab: real; // эффективность работы процедуры

proiz_rab: real; // Производительность работы

obch_eff: real; // эффективность работы системы

3.4 Результаты экспериментов

В данном проекте были проведены статистические исследования, чтобы проверить, как работает данная система при разных настройках. Результаты данного исследования приведены в таблице 3.1

Таблица 3.1 - Результаты статистического исследования

Экс-пери-мента

Время модели-рования, часы

Время ожидания заявки в очереди, минуты

Число аппа-ратов обслу-живания

Макси-мальная длина очереди

Число обслу-женных клиентов

Число необслу-женных

клиентов

Общая эффекти-вность

работы системы,%

Общая про-изво-дитель-ность,%

1

1

10

4

10

1

8

58,74

11,11

2

2

10

4

10

2

5

45,41

28,57

3

3

10

4

10

7

16

38,88

30,43

4

9

10

4

10

1

75

51,47

1,33

5

1

10

3

10

3

5

51,1

37,5

6

2

10

3

10

3

15

70,83

16,16

7

3

10

3

10

13

11

71,66

54,16

8

9

10

3

10

2

72

36,97

2,7

9

1

20

5

10

0

7

43,99

0

10

2

20

5

10

8

7

56,66

53,33

11

3

20

5

10

13

8

51,99

61,9

12

9

20

5

10

6

63

60,03

8,69

13

1

20

6

10

5

2

22,49

71,42

14

2

20

6

10

12

3

27,63

80

15

9

20

6

10

69

6

39,31

92

По полученным данным можно сказать, что при увеличении числа аппаратов общая эффективность работы возрастает, а производительность системы при этом падает. Из всех экспериментов лучшим результатом по эффективности работы был при времени моделирования 3 часа, с количеством аппаратов - 3 (т.е. минимальное число аппаратов). Эффективность при этом была равна 71, 66%.

А по производительности лучший результат при времени моделирования 9 часов, с количеством аппаратов 6 (т. е максимальное число аппаратов).

3.5 Руководство пользователю

Для запуска программы необходимо открыть исполняемый файл "SMO. exe". При этом появится заставка программы (Рисунок 3.1). Если вы желаете начать работу необходимо нажать кнопку "Старт", если вы желаете выйти выберите "Выход".

Рисунок 3.1 - Заставка программы

При нажатии на кнопке "Старт" появляется главное окно программы.

В начале работы активизируется вкладка "Начальные параметры". Здесь пользователь может задать свои параметры системы, такие как время моделирования, время ожидания в очереди, количество процедур, периодичность прихода клиентов, время процедуры, максимальная длина очереди, количество процедур для клиента (Рисунок 3.2). На вкладке также имеются кнопки "Пуск", "Остановить", "Выход", которые соответственно позволяют начать процесс моделирования, остановить его и завершить работу.

Рисунок 3.2 - Вкладка "Начальные параметры"

При запуске процесса моделирования на вкладке "Результаты" отображаются данные по текущему состоянию каждой процедуры, а также в виде диаграммы представляется эффективность работы каждой из них (Рисунок 3.3).

Рисунок 3.3 - Вкладка "Результаты"

При остановке работы или после окончания процесса моделирования появляется отчет о проделанной работе. Его можно увидеть, если выбрать вкладку "Отчет" в главном окне программы (Рисунок 3.4). В нем указывается вся общая информация, информация по всем процедурам (Число обслуженных клиентов, время занятости, время простоя, эффективность работы). Если есть необходимость отчет можно сохранить в текстовом файле.

Рисунок 3.4 - Вкладка "Отчет"

Разработка меню. Меню проекта располагается в верхней строке экрана. Своим присутствием оно создает значительные удобства пользователям для работы с программой. После открытия проекта пользователь может выбирать нужные команды.

В меню программы имеются вкладки: "Файл", "Моделирование", "Справка".

В вкладке меню "Файл" находятся команды: "Сохранить отчет", "Начальные параметры", "Результаты", "Показать отчет", "Выход" (Рисунок 3.5).

Рисунок 3.5 - Вкладка главного меню "Файл"

Команда "Сохранить" необходима для сохранения отчета о проделанной работе после окончания процесса моделирования.

Команда "Начальные параметры" позволяет открывать вкладку "Начальные параметры" для изменения настроек системы.

Команда "Результат" позволяет открывать вкладку "Результаты" для наблюдения текущего состояния каждой процедуры.

Команда "Показать отчет" позволяет открывать вкладку "Отчет".

В вкладке меню "Моделирование" находятся команды: "Запустить", "Остановить", "Очистить параметры" (Рисунок 3.6).

Рисунок 3.6 - Вкладка "Моделирование" главного меню

Команда "Запустить" необходима для запуска процесса моделирования.

Команда "Остановить" позволяет остановить процесс моделирования.

Команда "Очистить параметры" позволяет очистить все начальные параметры системы и удаляет результаты предыдущего моделирования.

Во вкладке меню "Справка" находятся команды: "О программе", "Помощь" (Рисунок 3.7).

Рисунок 3.7 - Вкладка "Справка" главного меню

Команда "О программе" позволяет посмотреть информацию о программе и авторе программы (Рисунок 3.8).

Рисунок 3.8 - Вызов справки о программе

Команда "Помощь" позволяет ознакомиться с общим руководством по работе данной системы (Рисунок 3.9).

Рисунок 3.9 - Вызов общей справки по системе

Панель инструментов. С помощью панели инструментов можно быстро сохранить отчет, начать процесс моделирования, остановить процесс моделирования, очистить начальные параметры, а также посмотреть общую справку по системе (Рисунок 3.10).

Рисунок 3.10 - Панель инструментов

Заключение

Разработанная в ходе выполнения курсового проекта имитационная модель системы массового обслуживания "Поликлиника" является актуальной на сегодняшний день, так как предоставляет большие возможности для анализа работы системы и принятия решений в различных ситуациях на практике.

Моделируя реальные процессы, пользователь может проследить, как изменяется эффективность работы системы. А затем, может сделать выводы о том, при каких установках система будет работать максимально производительно, сколько следует установить аппаратов, чтобы время простоя аппарата было минимально, а время занятости максимальным.

В ходе разработки данного проекта были приобретены практические навыки системного исследования реальной динамической сложной системы на основе построения ее имитационной модели.

Также были решены задачи, поставленные в начале работы. Мной были разработаны собственные алгоритмы для решения этих задач. Разработанная программа устойчиво выполняет все свои функции, но теперь стоит задача сделать ее более совершенной и более расширенной.

Список используемой литературы

1. Лифшиц А.Л. Статистическое моделирование СМО, М., 1978.

2. Советов Б.А., Яковлев С.А. Моделирование систем, М: Высшая школа, 1985.

3. Пригодин Н.В. Системный подход в моделировании М., 1986.

4. А.Я. Архангельский. Программирование в Delphi 7.

5. Электронный учебник по курсу "Прикладная теория систем"

6. Методическое обеспечение по курсу "Прикладная теория систем"

Страницы: 1, 2, 3



© 2003-2013
Рефераты бесплатно, курсовые, рефераты биология, большая бибилиотека рефератов, дипломы, научные работы, рефераты право, рефераты, рефераты скачать, рефераты литература, курсовые работы, реферат, доклады, рефераты медицина, рефераты на тему, сочинения, реферат бесплатно, рефераты авиация, рефераты психология, рефераты математика, рефераты кулинария, рефераты логистика, рефераты анатомия, рефераты маркетинг, рефераты релиния, рефераты социология, рефераты менеджемент.