Помощь В Решении Задачи На Gpss

Тема в разделе "Свободное общение", создана пользователем usergpss, 11 июн 2014.

  1. usergpss

    usergpss New Member

    Регистрация:
    11 июн 2014
    Сообщения:
    1
    Симпатии:
    0
    Здравствуйте, уважаемые программисты! У меня возникла задача! Моделирование тракта передачи данных.
    Для повышения надежности функционирования автоматизированной системы ее телекоммуникационная подсистема выполнена в виде совокупности трактов передачи сообщений. Структура всех трактов одинакова и представляет собой объединение из 6 разнородных каналов. Каждое сообщение передается последовательно по двум каналам, выбранным случайным образом.
    Вероятность возникновения ошибки в каналах за висит от их типа и составляет: 1 тип - 0,12; 2 тип- 0,08; 3 тип- 0,09; 4 тип- 0,11; 5 тип-0,15; 6 тип- 0,1.
    Средняя длина формализованного сообщения составляет 150 кбайт. Скорости передачи для каналов: 1,2 и 6 тип-14,4 кбит/с; 3 и 5 тип- 56 кбит/с;
    4 тип- 128 кбит/с.

    Цель: определить вероятность неприема сообщения и среднее время доставки.

    Решал немного похожую задачу:
    Исследовать тракт обмена информацией, состоящий из 5 каналов. По каналам передаются сообщения трех категорий срочности (КС). Длина сообщений первой КС постоянна и равна 10000 бит, а длины сообщений второй и третьей КС распределены по экспоненциальному закону со средним значением 10000 и 50000 бит соответственно. Известна скорость передачи данных в канале 9600 бит/с и интенсивность поступления сообщении каждой КС – 50, 100, и 500 запросов в час соответственно. Поток сообщений каждой КС - простейший. Обслуживание в канале – с относительным приоритетом.


    Вот программа:

    10 SIMULATE
    20 * MODEL CMO M/M/1
    30 EXP FUNCTION RN1,C13
    0,0/.1,.105/.2,.223/.3,.357/.4,.511/.5,.593/.6,.916/.7,1.304/.8,1.61/
    .9,2.303/.97,3.507/.995,5.298/.999,7
    40 TABNAME FUNCTION P$TIP_Z,D3
    1,TAB1/2,TAB2/3,TAB3
    50 TAB1 TABLE M1,0,10,20
    60 TAB2 TABLE M1,0,10,20
    70 TAB3 TABLE M1,0,10,20
    80 VAR1 VARIABLE 1000/X$NUM1
    90 VAR2 VARIABLE 1000/X$NUM2
    100 VAR3 VARIABLE 1000/X$NUM3
    110 GEN1 GENERATE V$VAR1,FN$EXP
    120 ASSIGN TIME_PROCESS,X$NUM4
    130 ASSIGN TIP_Z,1
    140 TRANSFER ,INPUT
    150 GEN2 GENERATE V$VAR2,FN$EXP
    160 ASSIGN TIME_PROCESS,X$NUM5
    170 ASSIGN TIP_Z,2
    180 TRANSFER ,INPUT
    190 GEN3 GENERATE V$VAR3,FN$EXP
    200 ASSIGN TIME_PROCESS,X$NUM6
    210 ASSIGN TIP_Z,3
    220 INPUT ASSIGN KVANT,5
    230 QUEUE OCHERED
    240 SEIZE SYSTEM
    250 DEPART OCHERED
    260 TEST GE P$TIME_PROCESS,P$KVANT,GO
    270 ADVANCE P$KVANT
    280 ASSIGN TIME_PROCESS-,P$KVANT
    290 TEST E P$TIME_PROCESS,0,OUT
    300 GO ADVANCE P$TIME_PROCESS
    310 ASSIGN TIME_PROCESS,0
    320 OUT RELEASE SYSTEM
    330 TEST E P$TIME_PROCESS,0,INPUT
    340 TABULATE FN$TABNAME
    350 TERMINATE 1
    360 INITIAL X$NUM1,100
    370 INITIAL X$NUM2,80
    380 INITIAL X$NUM3,50
    390 INITIAL X$NUM4,5
    400 INITIAL X$NUM5,3
    410 INITIAL X$NUM6,2
    420 START 13282
    430 * END



    а как переделать ее не знаю! если есть у кого- нибудь возможность, то подскажите пожалуйста!!! Спасибо!
     
Загрузка...

Поделиться этой страницей