Имитационное моделирование фрагмента центра коммутации и анализ его параметров, страница 8

 

Описание подпрограммы itog

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

Алгоритм основной программы 

                                                          1

2

3

да                                          нет

4

да                                               нет да        5                                           нет

6

да                                                нет

7                                          8

		S_line[u]=s_line[u]+1 Tsr[u]=Tsr[u]+1 Write(‘s_line[‘,u,’]=’s_line[u]’)

 

Generate Buffer serv

                                                      9                                 

 

                                                          10

 

Да                                           нет

 

Write(wait[‘,u,’]=’,wait[u]’)

                                          11

	Writeln(‘такт =’, i)

 

12

itog

                                                    13

 

Описание основной программы моделирующей процесс обслуживания вызовов .

Программа начинается с очистки экрана в первом блоке. Затем во втором блоке программа предлагает  ввести с клавиатуры величину интервала между заявками. Процесс моделирования происходит в цикле 3 от одного до конца времени моделирования описанного в разделе констант. Далее на каждом витке цикла три в цикле четыре проверяются все соединительные линии используемые в данный момент времени моделирования процесса. Если линия используется в шестом блоке определяется не была ли линия только что занята в этом случае в седьмом блоке время использования данной линии устанавливается равной единице в противном случае в восьмом блоке алгоритма увеличивается счетчики использования линии и выводится на экран номер линии и текущее время её обслуживания. После выполнения цикла четыре программа на каждом витке моделирования сначала запускает подпрограмму  generate проверяющую поступает или нет новый вызов в данный момент времени. Далее запускается процедура  bufer упорядочивающая вызовы в очереди и контролирующая время ожидания в пределах Тож. В последнюю очередь запускается процедура servкоторая в свою очередь контролирует время обслуживания заявки в сервере и вводит новые заявки в сервер по мере освобождения. Затем  в цикле представленном в десятом блоке выводится на дисплей содержимое очереди. В    конце каждого витка цикла пользователю  выводится текущее время моделирования (блок 12). По завершению процесса моделирования выполняется процедура выводящая результат моделирования: количество вызовов , среднее время использования и отказов всех типов .

Список литературы

1  А. В. Буданов, Н. В. Гольцова  «Компьютерные сети»

ГУТ. –СПб, 2000

2  М. Шварц «Сети связи: протоколы, моделирование и анализ» 1 и 2 части

Москва 1992г. Наука

3  Е.А. Зуев «Программирование на языке Turbo Pascal 6.0 7.0»

Москва 1993г. Радио и связь

4   В.Г. Мануйлов «Разработка программного обеспечения на Паскале»

Москва 1996г. Информатика и образование