Моделирование работы склада

@lapitalik · Регистрация: 05.03.2011

Помогите пожалуйста. Я просто недавно начал изучать GPSS.
Задание:
На склад готовой продукции предприятия каждые 5 ± 2 мин поступают изделия типа А партиями по 500 шт., а каждые 20 ± 5 мин — изделия типа В партиями по 2000 шт. С интервалом времени 10 ± 5 мин к складу подъезжают автомобили, в каждый из которых надо погрузить по 1000 шт. изделий типа А и В. Погрузка начинается, если изделия обоих типов имеются на складе в нуж¬ном количестве, и продолжается 10 ± 2 мин. У склада одновремен¬но могут находиться не более трех автомобилей, включая ав-томобиль, стоящий под погрузкой. Автомобили, не нашедшие места у склада, уезжают с его территории без груза. Смоделировать работу склада при условии, что загрузиться должны 50 автомобилей. Подсчитать число автомобилей, уехав¬ших без груза. Определить среднее и максимальное количество из¬делий каждого типа, хранящихся на складе.

@SergProgC++ · 23.04.2012, 21:09

SAVEVALUE Nomer_bez_gruza,XN1 ;сохранение новера уехавшего автомобиля - не будет выполняться через него не идут транзакты

Добавлено через 9 минут

C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 SIMULATE ;карта симуляции
 GENERATE 5,2 ;изделия типа А
 QUEUE SK1,500 ;занимают место на складе
 TERMINATE ;вывод
 
 GENERATE 20,5 ;изделия типа В
 QUEUE SK2,2000 ;занимают место на складе
 TERMINATE ;вывод
 
 GENERATE 10,5;подъезжающие грузовики
 TEST LE Q$Sklad,2,out;проверка есть ли место на территории склада
 QUEUE Sklad;очередь склада для грузовиков
 SEIZE Sk;занять место у склада
 DEPART Sklad;освободить очередь у склада
 TEST GE Q$SK1,1000;проверка есть ли на складе 1000шт типа А
 TEST GE Q$SK2,1000;проверка есть ли на складе 1000шт типа В
 DEPART SK1,1000 ;уменьшение кол-ва типа А (берем со склада)
 DEPART SK2,1000 ;уменьшение кол-ва типа В (берем со склада)
 ADVANCE 10,2 ;погрузка
 RELEASE Sk;освобождаем место у склада
 TERMINATE 1;выход
 out SAVEVALUE Nomer_bez_gruza,XN1 ;сохранение номера уехавшего автомобиля
     TERMINATE;вывод пустых автомобилей
  START 50 ;счетчик конца программы

Добавлено через 22 секунды

вот так

Добавлено через 17 минут
ошибки сами найдете

@lapitalik · 23.04.2012, 21:59 **[ТС]**

SergProgC++, спасибо еще раз огромное. Ошибку уже нашел. Спасибо.

Добавлено через 7 минут
А можно еще один вопрос:

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
LABEL              LOC  BLOCK TYPE     ENTRY COUNT CURRENT COUNT RETRY
                    1    GENERATE             6             0       0
                    2    QUEUE                6             0       0
                    3    TERMINATE            6             0       0
                    4    GENERATE             1             0       0
                    5    QUEUE                1             0       0
                    6    TERMINATE            1             0       0
                    7    GENERATE             2             0       0
                    8    TEST                 2             0       0
                    9    SAVEVALUE            2             0       0
                   10    QUEUE                2             0       0
                   11    SEIZE                2             0       0
                   12    DEPART               2             0       0
                   13    TEST                 2             0       0
                   14    TEST                 2             0       0
                   15    DEPART               2             0       0
                   16    DEPART               2             0       0
                   17    ADVANCE              2             1       0
                   18    RELEASE              1             0       0
                   19    TERMINATE            1             0       0
OUT                20    TERMINATE            0             0       0

почему так мало получается входов в систему?

@SergProgC++ · 23.04.2012, 22:09

Это не моя задача, в моей у меня лично
LOC BLOCK TYPE ENTRY COUNT CURRENT COUNT RETRY
1 GENERATE 108 0 0
2 QUEUE 108 0 0
3 TERMINATE 108 0 0
4 GENERATE 26 0 0
5 QUEUE 26 0 0
6 TERMINATE 26 0 0
7 GENERATE 54 0 0
8 TEST 54 0 0
9 QUEUE 53 2 0
10 SEIZE 51 1 0
11 DEPART 50 0 0
12 TEST 50 0 0
13 TEST 50 0 0
14 DEPART 50 0 0
15 DEPART 50 0 0
16 ADVANCE 50 0 0
17 RELEASE 50 0 0
18 TERMINATE 50 0 0
OUT 19 SAVEVALUE 1 0 0
20 TERMINATE 1 0 0

@lapitalik · 23.04.2012, 22:12 **[ТС]**

Вот что у меня получается при первом и втором моделировании

@SergProgC++ · 23.04.2012, 22:13

можно ваш код

@lapitalik · 23.04.2012, 22:18 **[ТС]**

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

Добавлено через 29 секунд

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
SIMULATE ;карта симуляции
 GENERATE 5,2 ;изделия типа А
 QUEUE SK1,500 ;занимают место на складе
 TERMINATE ;вывод
 
 GENERATE 20,5 ;изделия типа В
 QUEUE SK2,2000 ;занимают место на складе
 TERMINATE ;вывод
 
 GENERATE 10,5;подъезжающие грузовики
 TEST LE Q$Sklad,2,out;проверка есть ли место на территории склада
 QUEUE Sklad;очередь склада для грузовиков
 SEIZE Sk;занять место у склада
 DEPART Sklad;освободить очередь у склада
 TEST GE Q$SK1,1000;проверка есть ли на складе 1000шт типа А
 TEST GE Q$SK2,1000;проверка есть ли на складе 1000шт типа В
 DEPART SK1,1000 ;уменьшение кол-ва типа А (берем со склада)
 DEPART SK2,1000 ;уменьшение кол-ва типа В (берем со склада)
 ADVANCE 10,2 ;погрузка
 RELEASE Sk;освобождаем место у склада
 TERMINATE 1;выход
 out SAVEVALUE Nomer_bez_gruza,XN1 ;сохранение номера уехавшего автомобиля
     TERMINATE;вывод пустых автомобилей
  START 50 ;счетчик конца программы

Добавлено через 1 минуту
Ой, не тот код выложил. Вот код:

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
SIMULATE ;карта симуляции
 GENERATE 5,2 ;изделия типа А
 QUEUE SK1,500 ;занимают место на складе
 TERMINATE ;вывод
 
 GENERATE 20,5 ;изделия типа В
 QUEUE SK2,2000 ;занимают место на складе
 TERMINATE ;вывод
 
 GENERATE 10,5;подъезжающие грузовики
 TEST LE Q$Sklad,2,out;проверка есть ли место на территории склада
SAVEVALUE Nomer_bez_gruza,XN1 ;сохранение номера уехавшего автомобиля
 QUEUE Sklad;очередь склада для грузовиков
 SEIZE Sk;занять место у склада
 DEPART Sklad;освободить очередь у склада
 TEST GE Q$SK1,1000;проверка есть ли на складе 1000шт типа А
 TEST GE Q$SK2,1000;проверка есть ли на складе 1000шт типа В
 DEPART SK1,1000 ;уменьшение кол-ва типа А (берем со склада)
 DEPART SK2,1000 ;уменьшение кол-ва типа В (берем со склада)
 ADVANCE 10,2 ;погрузка
 RELEASE Sk;освобождаем место у склада
 TERMINATE 1;выход
 out TERMINATE;вывод пустых автомобилей
  START 50 ;счетчик конца программы

@SergProgC++ · 23.04.2012, 22:21

у меня все норм странно, 10 раз и результат все тотже

@lapitalik · 23.04.2012, 22:24 **[ТС]**

Я запустил первый раз, затему нажимаю Command->Clear. Затем Command->Start 1 и каждый раз получаются разные результаты и подозрительно мало входов

@SergProgC++ · 23.04.2012, 22:26

я щас умру

Добавлено через 31 секунду

нафига старт 1, когда у вас старт 50

Добавлено через 20 секунд
так и вводи старт 50

@lapitalik · 23.04.2012, 22:28 **[ТС]**

Пардон, затормозил малость.

@SergProgC++ · 23.04.2012, 22:30

и я пордон, чуть со стула не упал. Бывает

Добавлено через 36 секунд
бедный склад мы его замучили

@Abrammm · 17.12.2012, 18:17

Ребят,а можете кинуть полностью код этот программы,без ошибок..((а то у меня вообще не идет программа!!

@SergProgC++ · 17.12.2012, 20:03

Сообщение от Abrammm

Ребят,а можете кинуть полностью код этот программы,без ошибок..((а то у меня вообще не идет программа!!

что за ошибки?

@Abrammm · 17.12.2012, 21:36

нее..тут все пошло)))
спасибо*

03.01.2013, 21:38

Привет, есть возможность построить концептуальную модель и блок схему к задаче?
Вознаграждение. Скайп: einma039

Новые блоги и статьи Все статьи Все блоги /
Программа для com-порта Uhbif79 05.06.2026 Всем привет, давно хотел изучить Qt, начинал, бросал, потом снова начинал. И сейчас вот смог написать свою первую программу. До этого имел опыт программирования микроконтроллеров, писал прошивки на. . .	Транскрипция 55-минутного видео через Whisper: WhisperDesktop облажался, спас Google Colab[ anaschu 01.06.2026 Понадобилось получить текст из свежезагруженного видео на YouTube. Казалось бы, задача на пять минут. Заняла полтора часа. Делюсь опытом — может кому пригодится последовательность решений. . . .	21 мат мед. Планы на развитие модели здравоСохранения anaschu 01.06.2026 AnyLogic: план развития симуляционной модели рабочего коллектива — динамический абсентеизм, реальные данные, три сценария сравнения Продолжаю серию постов о дискретно-событийной модели рабочего. . .	20. Мат мед. Абсентеизм как отдельный тип простоя anaschu 29.05.2026 Апдейт модели: исправленные баги, абсентеизм и новые механизмы Продолжаю развивать ранее описанную модель рабочего коллектива на AnyLogic. За последние несколько дней был проведён серьёзный. . .
19. здоровье, усталость и психотип работника влияют на производительность предприятия, и наоборот, производительность на здоровье, усталось и психотип anaschu 28.05.2026 Дискретно-событийная модель рабочего коллектива на AnyLogic: здоровье, выгорание, психотипы и микростимуляция Привет, коллеги. Хочу поделиться итогами нескольких недель работы над симуляционной. . .	"Прокси" для последовательного порта Eddy_Em 28.05.2026 Эту штуку написал я достаточно давно. Но сейчас вот понадобилось настроить датчик грозы, но при этом не отключать его от "метеодемона". Соответственно, надо запустить этот "прокси": метеодемон будет. . .	Рефакторинг программы уравнивания. Massaraksh7 26.05.2026 Пример по предыдущей записи в блоге. Но, надо заметить, что, во-первых, там оптимизация не только математики, но и работы с базой данных, и с графами, а во-вторых, это ещё не всё.	Использование TThread в Lazarus для математических вычислений. Massaraksh7 25.05.2026 Производя рефакторинг своих программ на предмет ускорения их работы, обратил внимание на такой аспект, как сокращение времени матвычислений. Дело в том, что приходится работать с большими матрицами. . .

@lapitalik 0 / 0 / 0 Регистрация: 05.03.2011 Сообщений: 17

	Моделирование работы склада 15.03.2012, 20:17. Показов 17798. Ответов 34 Метки нет (Все метки) Помогите пожалуйста. Я просто недавно начал изучать GPSS. Задание: На склад готовой продукции предприятия каждые 5 ± 2 мин поступают изделия типа А партиями по 500 шт., а каждые 20 ± 5 мин — изделия типа В партиями по 2000 шт. С интервалом времени 10 ± 5 мин к складу подъезжают автомобили, в каждый из которых надо погрузить по 1000 шт. изделий типа А и В. Погрузка начинается, если изделия обоих типов имеются на складе в нуж¬ном количестве, и продолжается 10 ± 2 мин. У склада одновремен¬но могут находиться не более трех автомобилей, включая ав-томобиль, стоящий под погрузкой. Автомобили, не нашедшие места у склада, уезжают с его территории без груза. Смоделировать работу склада при условии, что загрузиться должны 50 автомобилей. Подсчитать число автомобилей, уехав¬ших без груза. Определить среднее и максимальное количество из¬делий каждого типа, хранящихся на складе. 0

@SergProgC++ Эксперт GPSS 555 / 414 / 105 Регистрация: 02.07.2010 Сообщений: 1,729
	23.04.2012, 22:09
	Это не моя задача, в моей у меня лично LOC BLOCK TYPE ENTRY COUNT CURRENT COUNT RETRY 1 GENERATE 108 0 0 2 QUEUE 108 0 0 3 TERMINATE 108 0 0 4 GENERATE 26 0 0 5 QUEUE 26 0 0 6 TERMINATE 26 0 0 7 GENERATE 54 0 0 8 TEST 54 0 0 9 QUEUE 53 2 0 10 SEIZE 51 1 0 11 DEPART 50 0 0 12 TEST 50 0 0 13 TEST 50 0 0 14 DEPART 50 0 0 15 DEPART 50 0 0 16 ADVANCE 50 0 0 17 RELEASE 50 0 0 18 TERMINATE 50 0 0 OUT 19 SAVEVALUE 1 0 0 20 TERMINATE 1 0 0 0

@lapitalik 0 / 0 / 0 Регистрация: 05.03.2011 Сообщений: 17
	23.04.2012, 22:12 [ТС]
	Вот что у меня получается при первом и втором моделировании Миниатюры 0

@SergProgC++ Эксперт GPSS 555 / 414 / 105 Регистрация: 02.07.2010 Сообщений: 1,729
	23.04.2012, 22:13
	можно ваш код 0

@SergProgC++ Эксперт GPSS 555 / 414 / 105 Регистрация: 02.07.2010 Сообщений: 1,729
	23.04.2012, 22:21
	у меня все норм странно, 10 раз и результат все тотже 0

@lapitalik 0 / 0 / 0 Регистрация: 05.03.2011 Сообщений: 17
	23.04.2012, 22:24 [ТС]
	Я запустил первый раз, затему нажимаю Command->Clear. Затем Command->Start 1 и каждый раз получаются разные результаты и подозрительно мало входов 0

@SergProgC++ Эксперт GPSS 555 / 414 / 105 Регистрация: 02.07.2010 Сообщений: 1,729
	23.04.2012, 22:26
	я щас умру Добавлено через 31 секунду нафига старт 1, когда у вас старт 50 Добавлено через 20 секунд так и вводи старт 50 0

@lapitalik 0 / 0 / 0 Регистрация: 05.03.2011 Сообщений: 17
	23.04.2012, 22:28 [ТС]
	Пардон, затормозил малость. 0

@SergProgC++ Эксперт GPSS 555 / 414 / 105 Регистрация: 02.07.2010 Сообщений: 1,729
	23.04.2012, 22:30
	и я пордон, чуть со стула не упал. Бывает Добавлено через 36 секунд бедный склад мы его замучили 0

@Abrammm 0 / 0 / 0 Регистрация: 17.12.2012 Сообщений: 4
	17.12.2012, 18:17
	Ребят,а можете кинуть полностью код этот программы,без ошибок..((а то у меня вообще не идет программа!! 0

@Abrammm 0 / 0 / 0 Регистрация: 17.12.2012 Сообщений: 4
	17.12.2012, 21:36
	нее..тут все пошло))) спасибо* 0

Rizla
	03.01.2013, 21:38
	Привет, есть возможность построить концептуальную модель и блок схему к задаче? Вознаграждение. Скайп: einma039