Форум программистов, компьютерный форум, киберфорум
GPSS
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.73/11: Рейтинг темы: голосов - 11, средняя оценка - 4.73
0 / 0 / 0
Регистрация: 29.04.2020
Сообщений: 10

Очередь

03.05.2020, 16:51. Показов 2187. Ответов 2

Студворк — интернет-сервис помощи студентам
Здравствуйте! Необходима помощь с решением по очереди:

Задание: "Вычислительная система состоит из трех компьютеров. С интервалом в среднем 4 единицы времени (закон распределения экспоненциальный) в систему поступают задания, которые с вероятностями 0,2, 0,5, 0,3 адресуются одному из трех компьютеров. В системе может обрабатываться одновременно не более 10 заданий. После обработки задания на первом компьютере оно с вероятностью 0,4 поступает в очередь ко второму компьютеру и с вероятностью 0,6 — в очередь к третьему компьютеру. После обработки на втором или третьем компьютере задание считается выполненным. Продолжительность обработки заданий на разных компьютерах характеризуется интервалами времени: 6,1, 5,1, 4,2.
По исходным данным смоделируем процесс обработки 400 заданий."

Выдает ошибку, что пытаюсь задать в очередь отрицательной, думаю, может DEPART в 1 устройстве просто не нужен, потому что уходит на 2 или 3 устройства, но сомневаюсь, прошу помощи.

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
GENERATE(Exponential(1,0,4)),,,400
QUEUE BR //та самая очередь
TRANSFER .2,COMP1
TRANSFER .5,COMP2
TRANSFER .3,COMP3
 
COMP1 TEST L Q$BR,10,OUT
SEIZE SYS1
DEPART BR //здесь ошибку выдает, что пытаюсь сделать очередь отрицательной
ADVANCE 6,1
RELEASE SYS1
TRANSFER .4,COMP2
TRANSFER .6,COMP3
 
COMP2 TEST L Q$BR,10,OUT
SEIZE SYS2
DEPART BR //здесь ошибки уже нет, далее тоже
ADVANCE 5,1
RELEASE SYS2
TRANSFER ,OUT
 
COMP3 TEST L Q$BR,10,OUT
SEIZE SYS3
DEPART BR
ADVANCE 4,2
RELEASE SYS3
 
 OUT TERMINATE 1
START 400
Заранее спасибо!
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
03.05.2020, 16:51
Ответы с готовыми решениями:

Очередь
Доброго времени суток всем! Совсем не давно начал изучать язык gpss, прорешивал различные задания и запнулся на совершенно...

Перенаправление в очередь
Voch TEST L CH$OCH,150,met7;Если очередь больше 150 то в кафе TEST L CH$OCH,100,met8;Если очередь больше 100 то в кафе TEST L...

Система массового обслуживания, 2 однородных устройства, общая очередь
Решаю задачу, не могу понять где ошиблась, подскажите пожалуйста. Текст задачи: Система массового обслуживания состоит из 2...

2
Эксперт GPSS
 Аватар для SergProgC++
555 / 414 / 105
Регистрация: 02.07.2010
Сообщений: 1,729
04.05.2020, 19:08
Лучший ответ Сообщение было отмечено bybanana как решение

Решение

У вас несколько раз выходит заявка из одной и той же очереди
допустим заявка зашла
Цитата Сообщение от bybanana Посмотреть сообщение
QUEUE BR //та самая очередь
потом после блока
Цитата Сообщение от bybanana Посмотреть сообщение
TRANSFER .2,COMP1
перешла на
Цитата Сообщение от bybanana Посмотреть сообщение
COMP1 TEST L Q$BR,10,OUT
далее она вышла из очереди
Цитата Сообщение от bybanana Посмотреть сообщение
DEPART BR //здесь ошибку выдает, что пытаюсь сделать очередь отрицательной
но потом она переходит по блоку
Цитата Сообщение от bybanana Посмотреть сообщение
TRANSFER .6,COMP3
и ниже опять выходит
Цитата Сообщение от bybanana Посмотреть сообщение
DEPART BR
Это раз

Добавлено через 3 минуты
да и вообще в принципе не верно записано
Цитата Сообщение от bybanana Посмотреть сообщение
TRANSFER .2,COMP1
TRANSFER .5,COMP2
TRANSFER .3,COMP3
Если вы 0,2 направляете на COMP1
то пишется это
Code
1
TRANSFER .2,,COMP1
а 0,8 пошло дальше,
потом вам надо 0,5 направить на COMP2, но 0,5 от всего потока а у вас уже 0,8

Добавлено через 1 минуту
и это уже будет выглядеть как
Code
1
2
TRANSFER .5,,COMP2
TRANSFER .4,COMP3,COMP1
Добавлено через 1 минуту
Тоже самое не верно
Цитата Сообщение от bybanana Посмотреть сообщение
TRANSFER .4,COMP2
TRANSFER .6,COMP3
Надо
Code
1
TRANSFER .4,COMP3,COMP2
Добавлено через 2 минуты
И у вас по условию
В системе может обрабатываться одновременно не более 10 заданий.
Не в очереди а в системе! Читайте внимательней

Добавлено через 1 минуту
Тоже самое, дано:
Цитата Сообщение от bybanana Посмотреть сообщение
По исходным данным смоделируем процесс обработки 400 заданий
А вы туда и отказы

Добавлено через 34 секунды
Но здесь на ваше усмотрение конечно

Добавлено через 2 минуты
Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
GENERATE(Exponential(1,0,4)),,,400
TEST L Q$BR,10,OUT
QUEUE BR
TRANSFER .5,,COMP2
TRANSFER .4,COMP3,COMP1
 
COMP1 QUEUE OSYS1
SEIZE SYS1
DEPART OSYS1
ADVANCE 6,1
RELEASE SYS1
TRANSFER .4,COMP3,COMP2
 
COMP2 QUEUE OSYS2
SEIZE SYS2
DEPART OSYS2
ADVANCE 5,1
RELEASE SYS2
TRANSFER ,OUT1
 
COMP3 QUEUE OSYS3
SEIZE SYS3
DEPART OSYS3
ADVANCE 4,2
RELEASE SYS3
OUT1 DEPART BR
TERMINATE 1 
 
OUT TERMINATE 1
 
START 400
1
0 / 0 / 0
Регистрация: 29.04.2020
Сообщений: 10
05.05.2020, 01:58  [ТС]
Большое спасибо!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
05.05.2020, 01:58
Помогаю со студенческими работами здесь

Очередь S1 не ограничена по содержимому, но время ожидания обслуживания не может превышать 20 секунд
Задание: Очередь S1 не ограничена по содержимому, но время ожидания обслуживания не может превышать 20 секунд. Заявки, время ожидания...

Две телефонистки на междугородней станции обслуживают общую очередь заказов. Смоделировать процесс
Две телефонистки на междугородней станции обслуживают общую очередь заказов. Очередной заказ обслуживает та телефонистка, которая первая...

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

Возможно ли смоделировать очередь, где условие входа в очередь задаётся логическим выражением?
Доброго всем дня! Моделирую Lean/Kanban, есть такое требование: пользователь должен иметь возможность менять размер очереди (от этого...

Очередь к клеркам
сделать очередь к каждому клерку (4 очереди)


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! в-строка - входное арифметическое выражение в инфиксной(обычной). . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru