рефераты

Рефераты

рефераты   Главная
рефераты   Краткое содержание
      произведений
рефераты   Архитектура
рефераты   Астрономия
рефераты   Банковское дело
      и кредитование
рефераты   Безопасность
      жизнедеятельности
рефераты   Биографии
рефераты   Биология
рефераты   Биржевое дело
рефераты   Бухгалтерия и аудит
рефераты   Военное дело
рефераты   География
рефераты   Геодезия
рефераты   Геология
рефераты   Гражданская оборона
рефераты   Животные
рефераты   Здоровье
рефераты   Земельное право
рефераты   Иностранные языки
      лингвистика
рефераты   Искусство
рефераты   Историческая личность
рефераты   История
рефераты   История отечественного
      государства и права
рефераты   История политичиских
      учений
рефераты   История техники
рефераты   Компьютерные сети
рефераты   Компьютеры ЭВМ
рефераты   Криминалистика и
      криминология
рефераты   Культурология
рефераты   Литература
рефераты   Литература языковедение
рефераты   Маркетинг товароведение
      реклама
рефераты   Математика
рефераты   Материаловедение
рефераты   Медицина
рефераты   Медицина здоровье отдых
рефераты   Менеджмент (теория
      управления и организации)
рефераты   Металлургия
рефераты   Москвоведение
рефераты   Музыка
рефераты   Наука и техника
рефераты   Нотариат
рефераты   Общениеэтика семья брак
рефераты   Педагогика
рефераты   Право
рефераты   Программирование
      базы данных
рефераты   Программное обеспечение
рефераты   Промышленность
      сельское хозяйство
рефераты   Психология
рефераты   Радиоэлектроника
      компьютеры
      и перифирийные устройства
рефераты   Реклама
рефераты   Религия
рефераты   Сексология
рефераты   Социология
рефераты   Теория государства и права
рефераты   Технология
рефераты   Физика
рефераты   Физкультура и спорт
рефераты   Философия
рефераты   Финансовое право
рефераты   Химия - рефераты
рефераты   Хозяйственное право
рефераты   Ценный бумаги
рефераты   Экологическое право
рефераты   Экология
рефераты   Экономика
рефераты   Экономика
      предпринимательство
рефераты   Юридическая психология

 
 
 

Шпаргалка: Моделирование работы. Simula

Моделирование работы в машинном зале в терминах Simula

Постановка задачи.

В студенческом машинном зале расположены две мини-ЭВМ и одно устройство подготовки данных (УПД). Студенты приходят с интервалом 8±3 мин. и треть из них хочет испытать УПД и ЭВМ, а остальные только ЭВМ. Допустимое количество студентов в машинном зале 4 чел., включая работающего на УПД.

Работа на УПД занимает 9±4 мин. Работа на ЭВМ - 15±10 мин.; 20% работавших на ЭВМ возвращаются для повторного использования УПД и ЭВМ и остаются при этом в машинном зале.

Если студент пришел в машинный зал, а там уже есть 4 чел., то он ждет не более 15±2 мин. в очереди в машинный зал и, если нет возможности в течение этого времени начать работать, то он уходит.

Смоделировать работу в машинном зале в течение 48 часов.

Определить:

  • загрузку УПД и обеих ЭВМ,
  • максимальную длину очереди в машинный зал,
  • среднее время ожидания в очереди в машинный зал,
  • распределение общего времени работы студента в машинном зале,
  • количество студентов, которые не дождались возможности поработать и ушли.

Решение задачи.

Текст программы.

Текст программы полностью приведен в конце данного документа.

Схема решения в терминах предметной области.

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

Работа студента в машинном зале происходит следующим образом. Студент определяет, приступить ли ему к работе УПД, а затем на одной из ЭВМ (по условию задачи, число таких студентов составляет треть от общего числа посетителей) или пройти сразу к ЭВМ (все остальные). После работы на ЭВМ каждый студент может либо покинуть машинный зал, либо приступить к повторной работе (20%), теперь уже точно на УПД и ЭВМ.

Схема решения задачи в терминах языка Симула.

Глобальные переменные и массивы.

M,U,C,P – целые числа, служащие для создания в программе четырех различных потоков независимых величин;

I – счетчик цикла FOR (используется для вывода таблицы);

MZCap – целое число, обозначающее число мест в машинном зале;

Num – число студентов, покинувших очередь;

Nmb – число студентов, дождавшихся обслуживания;

MAX – максимальная длина очереди;

Toz – суммарное время ожидания в очереди;

Pupd – время простоя УПД;

Pcomp – время простоя обеих ЭВМ;

QUEUE – очередь в машинный зал;

QUPD – очередь на УПД;

QCOMP – очередь на ЭВМ;

UPD1 – ссылка на УПД;

COMP1 – ссылка на пару ЭВМ;

Std – массив действительных чисел из 10 элементов, в которые помещаются данные о числе студентов, проделавших работу за i-й интервал времени [Ti-1,Ti];

Tim – массив действительных чисел, в котором хранятся границы временных интервалов Ti.

Процессы.

GENER – процесс, имитирующий появление студента у машинного зала;

STUDENT – процесс, описывающий действия студента;

COMP – процесс, изображающий работу двух мини-ЭВМ;

UPD – процесс, изображающий работу УПД;

Получение результатов.

Для получения результатов используются перечисленные в пункте 2.3.1 глобальные переменные и следующие соотношения:

Загрузка УПД = 1 - Pupd/time;

Загрузка ЭВМ = 1 - Pcomp/time;

Число ушедших студентов = Num;

Максимальная длина очереди = MAX;

Среднее время ожидания в очереди =Toz/(Num + Nmb)

Распределение общего времени работы студента в машинном зале получено в виде массивов std и tim.

Комментарии к программе.

Подробные комментарии приведены в тексте программы в конце данного документа.

Результаты.

Загрузка УПД = 33,8%;

Загрузка ЭВМ = 82,1%;

Число ушедших студентов = 109;

Максимальная длина очереди = 3;

Среднее время ожидания в очереди = 9,79 мин.

Распределение общего времени работы студентов в машинном зале приведено в таблице 2.1.

Таблица 2.1

Число студентов

Интервалы времени

14

0 – 15

86

15 – 30

56

30 – 45

20

45 – 60

19

60 – 75

24

75 – 90

12

90 – 105

9

105 – 120

8

120 – 135

Исследование адекватности модели.

Метод исследования.

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

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

Применение метода к поставленной задаче.

Вся информация по измененным входным данным и полученным результатам представлена в таблице 3.1 Знаком “|” отделяются значения для исходной задачи от значений для задачи, получаемой в результате внесения изменений.

Таблица 3.1

Параметр

Загрузка УПД, %

Загрузка ЭВМ, %

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

Среднее время ожидания, мин.

Число ушедших студентов, чел.

Время работы системы

48 | 100

часов

 

33,8 | 32,0

 

81,2 | 83,1

 

3 | 3

 

9,79 | 9,72

 

109 | 324

Число мини-ЭВМ

2 | 1

шт.

33,8 | 21,4

81,2 | 81,0

3 | 3

9,79 | 12,12

109 | 229

Число человек в зале

4 | 2

33,8 | 31,8

81,2 | 83,6

3 | 3

9,79 | 9,76

109 | 149

Интервал между приходами студентов

8±3 | 1

 

33,8 | 34,0

 

81,2 | 83,2

 

3 | 18

 

9,79 | 14,36

 

109 | 2650

Число желающих использовать УПД и ЭВМ

33 | 66

%

 

33,8 | 47,1

 

81,2 | 76,6

 

3 | 3

 

9,79 | 11,17

 

109 | 192

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

Сравнительный анализ моделей.

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

Таблица 4.1

Величина

GPSS

Симула

Загрузка УПД

55,2

33,8

Загрузка ЭВМ

96,5

81,2

Число ушедших студентов

78

109

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

4

3

Среднее время ожидания

9,02

9,79

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

 

SIMULATION begin

integer M,U,C,P,I; comment потоки случайных величин и счетчик цикла;

integer MZCap; comment вместительность машинного зала;

integer Num, comment число студентов, покинувших очередь;

Nmb; comment число студентов, дождавшихся обслуживания;

integer MAX; comment максимальная длина очереди;

integer Toz; comment суммарное время ожидания в очереди;

integer Pupd, comment время простоя УПД;

Pcomp; comment суммарное время простоя двух ЭВМ;

ref (HEAD) QUEUE; comment очередь в машинный зал;

ref (HEAD) QUPD; comment очередь на УПД;

ref (HEAD) QCOMP; comment очередь на ЭВМ;

ref (UPD) UPD1; comment УПД;

ref (COMP) COMP1; comment пара мини-ЭВМ;

real array std (1:10); comment число студентов в i-м интервале;

real array tim (1:9); comment интервалы гистограммы;

comment описание работы генератора, имитирующего появление студентов;

PROCESS class GENER;

begin

CREAT: activate new STUDENT; comment студент подходит к машинному залу;

hold(randint(5,11,M)); comment интервал перед приходом следующего;

goto CREAT;

end GENER;

comment описание действий студента;

PROCESS class STUDENT;

begin

integer vyb, comment возможность выбора работы: на УПД и ЭВМ (3) или только

на ЭВМ (1 и 2);

rep, comment возможность повтора работы (5);

wat; comment время, до которого студент может ждать в очереди;

integer tm; comment фактическое время ожидания или работы;

vyb:=randint(1,3,P); comment если 3, то работа на УПД и ЭВМ;

rep:=randint(1,5,P); comment если 5, то повторить работу;

wat:=time+randint(13,17,P); comment время максимального ожидания;

tm:=time; comment засечь время;

into(QUEUE); comment встать в очередь в машинный зал;

if (QUEUE.cardinal>=MAX) then comment если число людей в очереди больше,

чем ранее;

MAX:=QUEUE.cardinal; comment записать новое значение;

while MZCap>=4 do begin comment пока в машинном зале нет мест;

hold(0.1); comment подождать 6 секунд;

if time>wat then begin comment если текущее время превысило максимум;

out; comment покинуть очередь;

Num:=Num+1; comment увеличение числа ушедших студентов;

Toz:=Toz+time-tm; comment увеличение суммарного времени ожида-

ния;

goto STOP; comment завершить все действия;

end;

end;

out; comment покинуть очередь;

Toz:=Toz+time-tm; comment увеличение суммарного времени ожидания;

Nmb:=Nmb+1; comment увеличение числа студентов, дождавшихся

обслуживания;

MZCap:=MZCap+1; comment уменьшение числа мест в машинном зале;

tm:=time; comment засечь время;

if (vyb=3) or (vyb=2) then begin comment если студент собирался работать на УПД;

UPD: into(QUPD); comment занять очередь на УПД;

activate UPD1 delay 0; comment занять УПД;

passivate; comment ждать конца выполнения работы;

end;

into(QCOMP); comment занять очередь на ЭВМ;

activate COMP1 delay 0; comment занять ЭВМ;

passivate; comment ждать конца выполнения работы;

if rep=5 then comment если работу нужно повторить;

begin

rep:=1; comment сброс повторения;

goto UPD; comment перейти к УПД;

end;

histo(std,tim,time-tm,1); comment сохранить статистику;

MZCap:=MZCap-1; comment освободить место в зале;

STOP: comment завершение всех действий;

end STUDENT;

comment описание работы мини-ЭВМ;

PROCESS class COMP;

begin

ref (STUDENT) S; comment студент, занимающий место;

integer Nach; comment время начала простоя;

START: S:-QCOMP.first; comment первый студент в очереди;

S.out; comment покидает ее,;

hold(randint(5,25,C)/2); comment работает на ЭВМ;

activate S; comment и переходит к следующему действию;

Nach:=time; comment засечь время;

passivate; comment ждать следующего студента;

Pcomp:=Pcomp+(time-Nach)/2; comment увеличить время общего простоя;

goto START;

end;

comment описание работы УПД;

PROCESS class UPD;

begin ref (STUDENT) S; comment студент, занимающий УПД;

integer Nach; comment время начала простоя;

START: S:-QUPD.first; comment первый студент в очереди;

S.out; comment покидает ее,;

hold(randint(5,13,U)); comment работает на УПД;

activate S; comment и переходит к следующему действию;

Nach:=time; comment засечь время;

passivate; comment ждать следующего студента;

Pupd:=Pupd+time-Nach; comment вычислить общее время простоя;

goto START;

end UPD;

comment инициализация потоков случайных чисел;

M:=2;U:=1;C:=3;P:=4;

QUEUE:-new HEAD; comment создание очереди в машинный зал;

QUPD:-new HEAD; comment создание очереди на УПД;

QCOMP:-new HEAD; comment создание очереди на ЭВМ;

UPD1:-new UPD; comment создание УПД;

COMP1:-new COMP; comment создание ЭВМ;

comment установка временных интервалов гистограммы;

tim(1):=15; tim(2):=30; tim(3):=45; tim(4):=60;

tim(5):=75; tim(6):=90; tim(7):=105; tim(8):=120;

tim(9):=135;

comment создание и запуск генератора студентов;

activate new GENER;

hold(2880); comment моделирование работы системы в течение 48 часов;

comment вывод полученных значений;

outfix(1-Pupd/time,3,5);outimage; comment загрузка УПД;

outfix(1-Pcomp/time,3,5);outimage; comment загрузка ЭВМ;

outfix(Num,0,5);outimage; comment число ушедших студентов;

outfix(MAX,0,5);outimage; comment максимальная длина очереди;

outfix(Toz/(Num+Nmb),2,5);outimage; comment среднее время ожидания в очереди;

comment вывод распределения общего времени работы студентов в машинном зале;

for I:=1 step 1 until 9 do

begin

outint(tim(I),11); comment время работы;

outint(std(I),11); comment число студентов;

outimage;

end;

end


© 2011 Рефераты