GPSS , Вопрос для знающих

я так понял, это задача про горячий резерв?

нафиг линки анлинки
используй сохраняемые величины или параметры транзактов.. или функции

GEN VARIABLE    (10-2+(2#2#RN1/1000))#X$TEMP    ;вычисляем интервал генерации транзактов (8..12 при X$TEMP=1 или 16..24 при X$TEMP=2)
    GENERATE    V$GEN   ;генерирование сигнала через интервалы времени, определенные вычисляемой величиной GEN
    TEST E  X$YPSIG,1,MET1  ;Если YPSIG равен 1 (управляющий сигнал получен), то дальше, иначе на метку
    SAVEVALUE   TEMP,1  ;в переменную TEMP положить единиццу (нормальный режим)
    TRANSFER    ,MET2   ;отправить на метку
MET1    SAVEVALUE   TEMP,2  ;в переменную TEMP положить двойку (заторможеный режим)
met2 ...

ну это моя реализация. ты можешь в сейвалуе просто сохранять значеня времени и подставлять их в адванс.

Здравствуйте! Подскажите, пожалуйста, правильность решения (и, если оно неправильное - чего добавить/убавить).

Задача

Цитата

Одноканальная СМО с отказами представляет собой одну телефонную линию. Заявка (вызов), пришедшая в момент, когда линия занята, получает отказ. Все потоки событий простейшие.
Интенсивность потока λ= 0,95 вызова в минуту. Средняя продолжительность разговора t = 1 мин. Определите вероятностные ха¬рактеристики СМО в установившемся режиме работы.

Код:

; Единица измерения времени - минута
Line STORAGE 1
GENERATE 0.95
ENTER Line
ADVANCE 1,0.2
LEAVE Line
TERMINATE Line
START 600

Либо задание простое, либо не все так просто как я понял

ну вопервых надо использовать не ентер/лив, а сейз/релайз
хотя это и не ошибка
а вовторых отсутствует блок отказов
после дженерейта надо вставить test e f$Line,0,otkaz

Добавлено 15.12.09, 17:44
да и тут ошибочка

GENERATE 0.95

надо

GENERATE (1/0.95)

Спасибо за замечания! А по отказу что делать? Просто test e f$Line,0 как я понял нельзя
p.s. ок )

Сообщение отредактировано: dj_kovrik - 15.12.09, 20:16

учи мат часть )

люди, помогите написать программу на GPSS! Пожалуйста!
Автоматизированная система управления АСУ продажей железнодорожных билетов состоит из двух параллельно работающих ЭВМ. При выходе из строя одной ЭВМ АСУ продолжает нормально функционировать за счет работы другой ЭВМ. Поток отказов каждой ЭВМ простейший. Среднее время безотказной работы одной ЭВМ равно 10 суткам. При выходе из строя отказавшую ЭВМ начинают ремонтировать. Время ремонта ЭВМ распределено по показательному закону и в среднем составляет двое суток. В начальный момент обе ЭВМ исправны. Найти среднюю производительность АСУ, если при исправности хотя бы ЭВМ ее производительность равна 100%, а при отказе обеих ЭВМ продажа билетов производится вручную, обеспечивая 30% общей производительности АСУ.

РЕБЯТ ПОДСКАЖИТЕ , КАК СДЕЛАТЬ ТАК ЧТОБ ТРАНЗАКТ ПОСТУПАЛ НА ОБРАБОТКУ ЧЕРЕЗ ИНТЕРВАЛ ВРЕМЕНИ, РАСПРЕДЕЛЕННЫЙ ПО ЭКСПОНЕНЦИАЛЬНОМУ ЗАКОНУ СО СРЕДНИМ 2

Добавлено 17.12.09, 21:28
ДУМАЛ ЗАДАЕТСЯ КАК
GENERATE (EXPONENTIAL(0,1,2)), АН НЕТ... РУГАЕТСЯ.

НАШЕЛ В ИНЕТЕ ВОТ ТАКОЕ

EXP FUNCTION RN$1,C14
0.,0./.1,.104/.3,.555/.5,.69/.6,.915
.7,1.2/.8,1.6/.85,1.95/.9,2.3/.95,3
.98,3.9/.99,4.6/.995,5.3/.999,7.

ЭТО ПРАВИЛЬНО?

marsovi4

Цитата marsovi4 @ 17.12.09, 21:24

GENERATE (EXPONENTIAL(0,1,2))

ENERATE (EXPONENTIAL(1,0,2))
генератор, сдвиг, среднее
учи мат часть )

EXP FUNCTION RN$1,C14
0.,0./.1,.104/.3,.555/.5,.69/.6,.915
.7,1.2/.8,1.6/.85,1.95/.9,2.3/.95,3
.98,3.9/.99,4.6/.995,5.3/.999,7.

ENERATE 2,fn$EXP

как сделать так чтобы ПРИОРИТЕТ задачи был определен функцией распределения PRI(0.4,0.5,0.1)

Сообщение отредактировано: marsovi4 - 17.12.09, 23:19

Ребят помогите,никак домозговать не могу...
вот задание МОДЕЛЬ СПЕЦИАЛИЗИРОВАННОЙ ЭВМ

Построить модель системы, состоящей из источника задач и специализированной ЭВМ (СЭВМ). В конфигурацию ЭВМ входят процессор и оперативная память. Из источника задачи поступают на обработку в СЭВМ через интервалы времени, распределенные по экспоненциальному закону со средним 2. Каждая задача занимает раздел оперативной памяти и становится в очередь к процессору. Количество разделов равно 64. Процессор обслуживает задачи по относительному приоритету.Приоритеты имеют 3 уровня. Приоритет задачи определен функцией распределения PRI(0.4,0.5,0.1).
Отсутствие свободного раздела опеpативной памяти (ОП) влечет за собой отказ на обслуживание. В этом случае вновь поступившая задача покидает СЭВМ, т.е. уничтожается. Аналогично происходит с задачей, обслуженной процессором.
Время обработки задачи 0,4 мс. процессором распределенно экспоненциально дообслуживанием по приоритету.
Определить:
- коэффициент загрузки процессора;
- среднее время обслуживания задачи в СЭВМ;
- вероятность отказа и гистограмму времени нахождения задачи в СЭВМ.
Исходный текст модели и результаты моделирования приведены ниже.

вот что я уже сделал

op storage 64
proz storage 1
transit table M1,10,10,20
generate (EXPONENTIAL(1,0,2))
savevalue kolsgen+,1
gate snf op,otkazy
enter op
queue och
seize proz
depart och
leave op
advance
release proz
tabulate transit
terminate 1
otkazy savevalue otkaz+,1
savevalue verOTKAZA,(X$otkaz/X$kolsgen)
terminate
start 500

что надо приписать к задержке чтоб выполнялось условие из задания: Время обработки задачи 0,4 мс. процессором распределенно экспоненциально дообслуживанием по приоритету.

marsovi4

pri function rn1,d3
.4,1/.9,2/1,3
 
 
..............
priority fn$pri

Сообщение отредактировано: TEMENb - 18.12.09, 06:52

т.е. вот так будет выглядить готовый вариант? или есть ошибки?

op storage 64
proz storage 1
transit table M1,10,50,10
generate (EXPONENTIAL(1,0,2))
pri function rn1,d3
.4,1/.9,2/1,3
savevalue kolsgen+,1
gate snf op,otkazy
enter op
queue och
seize proz
depart och
leave op
advance 4,fn$pri
release proz
tabulate transit
terminate 1
otkazy savevalue otkaz+,1
savevalue verOTKAZA,(X$otkaz/X$kolsgen)
terminate
start 100

Подскажите пожайлуста с чего начать решение этой задачи :

В карьере грузовики доставляют руду от трех экскаваторов к другу дробилки. Грузовики приписаны к определенным экскаваторов, так что каждый грузовик всегда возвращается к своему экскаватора после того, как выгрузили руду у дробилки Используются грузовики двух видов; грузоподъемностью 20 и 50 тонн. Грузоподъемность влияет на время погрузки машин экскаватором, время переезда в дробилки, время разгрузки и время возвращения к экскаваторам Числовые характеристики этих величин приведены в таблице.

Процесс Время для

20-тонного грузовика Время для

50-тонного грузовика
Погрузка Случайная величина с экспоненциальным распределением со средним значением 5 минут Случайная величина с экспоненциальным распределением со средним значением

10 минут
Переезда в дробилки Постоянная величина 2,5 минуты Постоянная величина

3 минуты
Разгрузка Случайная величина с экспоненциальным распределением со средним значением 5 минут Случайная величина с экспоненциальным распределением со средним значением

4 минуты
Возврат к экскаваторам Постоянная величина 1,5 минуты Постоянная величина

2 минуты


К каждому экскаваторы закреплены два грузовика 20-тонный и 50-тонна Все очереди к экскаваторам имеют дисциплину обслуживания FIFO. В очереди к дробивкы машины стоят в порядке уменьшения их грузоподъемности, а при одинаковой грузоподъемности - по правилу FIFO.

Целью моделирования является определение:
среднего количества грузовиков у каждого экскаватора и в дробилки;
коэффициенты загрузки каждого экскаватора и дробилки.

Сообщение отредактировано: Skam - 20.12.09, 12:00

ЗДРАВСТУЙТЕ, ПОМОГИТЕ ПОЖАЛУЙСТО. СДЕЛАТЬ ЭТУ ЗАДАЧУ В GPSS!!! ОЧЕНЬ-ОЧЕНЬ НАДО ...

На обрабатывающий участок цеха поступают детали в среднем через 50 мин. Первичная обработка деталей производится на одном из двух станков. Первый станок обрабатывает деталь в среднем 40 мин и имеет до 4% брака, второй соответственно 60 мин и 8% брака. Вс бракованные детали возвращаются на повторную обработкуна второй станок. Детали, попавшие в разряд бракованных дважды, считаются отходами. Вторичную обработку проводят так же 2 станка в среднем 100 мин каждый. Причём первый станок обрабатывает имеющиеся в накопителе после первичной обработки детали, а второй станок подключается при образовании в накопителе задела больше трёх деталей. Все интервалы времени распределены по экспоненциальному закону.
Смоделировать обработку на участке 500 деталей. Определить загрузку вторго станка на вторичной обработке и вероятность появления отходов. Определить возможность снижения задела в накопителе и повышения загрузки второго станка на вторичной обратотке.


ЗАРАНЕЕ ВСЕМ БОЛЬШОЕ СПАСИБО!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Добавлено 21.12.09, 15:33
ЗДРАВСТВУЙТЕ ПОМОГИТЕ НАПИСАТЬ ПРОГРАММУ В GPSS!!! ОЧЕНЬ ОЧЕНЬ НАДО !!!
На обрабатывающий участок цеха поступают детали в среднем через 50 мин. Первичная обработка деталей производится на одном из двух станков. Первый станок обрабатывает деталь в среднем 40 мин и имеет до 4% брака, второй соответственно 60 мин и 8% брака. Вс бракованные детали возвращаются на повторную обработкуна второй станок. Детали, попавшие в разряд бракованных дважды, считаются отходами. Вторичную обработку проводят так же 2 станка в среднем 100 мин каждый. Причём первый станок обрабатывает имеющиеся в накопителе после первичной обработки детали, а второй станок подключается при образовании в накопителе задела больше трёх деталей. Все интервалы времени распределены по экспоненциальному закону.
Смоделировать обработку на участке 500 деталей. Определить загрузку вторго станка на вторичной обработке и вероятность появления отходов. Определить возможность снижения задела в накопителе и повышения загрузки второго станка на вторичной обратотке.

ЗАРАНЕЕ ВСЕМ ОГРОМНОЕ СПАСИБО!!!!

Всем здрасти вот несколько задач и их решений... это задачи с курсовой по имитационнму моделированию... решал сам ну в общем как смог.

Поток самолетов, требующих посадки в аэропорту, - пуассоновский с интенсивностью λ, самолетов в час. В аэропорту есть n посадочных полос. Самолет, совершив посадку на полосу, освобождает ее через t1 минут. Если самолет, требующий посадки, застает все полосы занятыми, то он становится в «очередь» самолетов, ожидающих посадки. Через t2 ± t3 минут после затребования посадки самолет нуждается в дозаправке, что обходится аэропорту в S1 ± S2 ед. стоимости. После t4 минут безуспешного ожидания самолет отправляется на посадку в другой аэропорт. За каждый самолет, совершивший посадку без ожидания, аэропорт получает прибыль S3 ед. стоимости. За каждый самолет, севший после ожидания, - S4 ± S5 ед. стоимости. Эксплуатация одной посадочной полосы обходится в S6 ед. стоимости в месяц.
Определить количество n посадочных полос, при котором достигается максимальная экономическая эффективность.

Параметры

λ 10
n 2
t1 35
t2±t3 70±10
S1±S2 1000±200
t4 140
S3 2000
S4±S5 1500±100
S6 1000000

T4 variable 140
T2T3 variable 35
S1S2 variable 1100
S4S5 variable 1550
Sob variable 0
aero storage 2
initial X$Zap,0
initial X$Sev,0
initial X$STn,0
 
generate (poisson(1,4))
queue och
test g qt$och,V$T2T3,aaa
savevalue Zap+,V$S1S2
aaa test l qt$och,V$T4,ddd
enter aero
depart och
advance 70
leave aero
savevalue Sev+,V$S4S5
transfer ,ccc
ddd depart och
ccc terminate
 
generate 43200
savevalue STn+,2000000
savevalue Sob+,X$Sev
Savevalue Sob-,X$Zap
Savevalue Sob-,X$STn
terminate 1
start 1

единственно не смог решить пробелму с переменными t2±t3,S1±S2,S4±S5, по этому пришлось усреднять значения(( решение не супер но как вариант, если предложите что нить другое тоже с удовольствием посмотрел бы))

Частный магазин покупает партию из N единиц товара по оптовой цене S единиц стоимости. Деньги на приобретение товара владелец магазина берет в кредит. Процентная ставка за кредит составляет k процентов от суммы непогашенного кредита в день (табл. 13).
Поток покупателей, приходящих в магазин, - пуассоновский с параметром λ мин-1.
Вероятность того, что покупатель не будет покупать товар и сразу уйдет из магазина, зависит от длины очереди и розничной цены товара:
Руход=1 - р1*р2, (1)
где
р1 - вероятность того, что длина очереди «устраивает» покупателя,
р2 - вероятность того, что он купит товар по установленной розничной цене.
Время обслуживания покупателя в магазине - равномерно распределенная случайная величина в интервале А ± В мин.
Определить наиболее выгодную розничную цену продажи товара в магазине с учетом платы за кредит.
Примечание. Считать, что после продажи единицы товара величина кредита уменьшается на отпускную цену проданного товара (если долг еще существует). Это приводит к тому, что величина кредита и выплата процентов по нему уменьшаются.

Параметры
N 600
S 1000
k, % 1
λ 0,05
p1 - очередь до 3 человек 0,55
4 - 6 человек 0,2
7 - 10 человек 0,15
Свыше 11 человек 0,1
p2 - цена до 1,5 S 0,67
1,5S - 2S 0,14
2S - 3S 0,11
3S - 4S 0,08
A 20
B 4

RST variable 0.67
Pst variable 1500
Initial X$STob,0
initial X$Kred,600000
initial X$tov 600
initial X$Vremk 0
initial X$Vremt 0
initial X$Vrem 0
initial X$SumS 0
initial X$Den 1440
Den1 variable 1440
 
Generate (poisson(1,20))
test G X$Kred,0,yyy
savevalue Vremk,C1
yyy test G X$tov,0,ttt
savevalue Vremt,C1
test LE Q$och,3,aaa
transfer 0.55,aaa,bbb
aaa test LE Q$och,6,ccc
transfer 0.2,ccc,bbb
ccc test LE Q$och,10,ddd
transfer 0.15,ddd,bbb
ddd test GE Q$och,11,ttt
transfer 0.1,ttt,bbb
bbb transfer V$RST,ttt,eee
eee queue och
seize mag
depart och
advance 20,4
release mag
savevalue Vrem,C1
test G X$Kred,0,iii
test GE X$Vrem,X$Den,iii
Stav FVariable X$Kred/100
savevalue SumS,V$Stav
Savevalue Kred+,X$SumS
Savevalue Den+,V$Den1
iii Savevalue tov-,1
savevalue STob+,V$Pst
savevalue Kred-,V$Pst
 
ttt terminate
 
generate 43200
terminate 1
start 1

Задание 4.
В цех на участок обработки поступают партии деталей по три в каждой. Интервалы между приходом партий - случайные величины, равномерно распределенные в интервале A ±B минут. Первичная обработка деталей происходит на одном из двух типов станков. Деталь поступает на обработку на станок с меньшей очередью. Станок первого типа обрабатывает деталь за Т1 минут и допускает k1 процентов брака, второго типа - соответственно, Т2 минут и k2 процентов брака. Все бракованные детали возвращаются на повторную обработку на свой станок. Детали, которые были забракованы дважды, считаются отходами и отправляются на утилизацию.
После первичной обработки детали поступают в накопитель, а из него - на вторичную обработку, которую проводят два параллельно работающих станка за время, распределенное по экспоненциальному закону со средним Т3 минут на одну деталь каждый. Причем второй станок подключается к работе, только если в накопителе находится более трех деталей. Затраты на содержание станков первого и второго типов составляют, соответственно, S1 и S2 единиц стоимости в час, независимо от того, используется станок или нет. Цена реализации готовой детали составляет S3 единиц стоимости, а стоимость покупки необработанной детали - S4 единиц стоимости.
Есть возможность повысить качество первичной обработки деталей. Уменьшение уровня брака в работе станков на r процентов требует дополнительных затрат r*S5 единиц стоимости на каждую деталь. Действия по повышению эффективности качества первичной обработки могут проводиться для обоих типов станков независимо друг от друга.
Определить, сколько станков первого и второго типов необходимо иметь и в каком объеме проводить мероприятия по повышению качества первичной обработки, чтобы достичь максимума прибыли за единицу времени.

Параметры
A±B k1 k2 T1 T2 T3 S1 S2 S3 S4 S5
60±10 4 11 45±12 80±20 30 6 2 300 50 5

initial x$prib,0
stan1 storage 1
stan2 storage 1
stan3 storage 1
stan4 storage 1
 
 
Generate 60,10
Split 2,aaa
aaa test LE Q$och1,Q$och2,zzz
bbb queue och1
enter stan1
depart och1
advance 45,12
leave stan1
transfer .04,xxx,yyy
yyy assign 1+,1
test L P1,2,ttt
transfer ,bbb
zzz queue och2
enter stan2
depart och2
advance 80,20
leave stan2
transfer .11,xxx,www
www assign 1+,1
test L P1,2,ttt
transfer ,zzz
xxx savevalue prib-,50
test LE Q$och,3,rrr
queue och
enter stan3
depart och
advance (exponential(1,0,30))
leave stan3
transfer ,uuu
rrr enter stan4
advance (exponential(1,0,30))
leave stan4
uuu savevalue prib+,350
ttt terminate
 
generate 2400
savevalue prib-,640 //единственно не понял почему здесь отнимаем 640 сказали вставить)))
terminate 1
start 1

Сообщение отредактировано: WoodenArow - 23.12.09, 17:06