Файл: Алферова, З. В. Математическое обеспечение экономических расчетов с использованием теории графов.pdf

ВУЗ: Не указан

Категория: Не указан

Дисциплина: Не указана

Добавлен: 21.10.2024

Просмотров: 66

Скачиваний: 0

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

В блоке 3 задается начальный номер для переборки номеров всех документов. Путем сравнения ячейки НД (номер документа) с документами массива-вектора определяются исходные (блоки

4—6),

результатные

(блоки 4, 5, 7, 12, 13) и промежуточно-резуль­

татные

(блоки 4, 5,

7—12) документы. Конец

просмотров опреде­

ляется

по счетчику

СЧ, когда он содержит 0.

После разделения

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

Номер документа

Порядок компоненты

н д

I

с

Порядок компонент

определяется

по следующей схеме.

В ячейку Н Д выбирается результатный документ.

Затем просматривается вся запись на наличие в ней резуль­ татного документа другой задачи. Если таких документов нет, то порядок документа в Н Д равен 1. Если же найден результатный документ другой задачи, то порядок компоненты С увеличивается

0 L J

0

1

Печать

7

 

Ч

Ти.ТП.ТР

I

 

 

1=1

 

 

 

ПС-'О

 

 

77

1 • = I'l

 

 

С: = 7

 

Рис. 36. Блок-схема I I части алгоритма анализа потоков информации

12. Заказ 4230.

177


Рис.36. Блок-схема I I части алгоритма анализа потоков информации. Продолжение

178

на 1. Затем следует

переход на аналогичный просмотр задачи, для

которой найденный

документ является результатным, и так до

тех пор, пока не будет найден такой результатный документ, ко­

торый получен из

одних исходных документов. После этого осу­

ществляется переход к рассмотрению следующей записи. В ячей­ ке С накапливается порядок компоненты. В ячейке ПС хранится порядок схемы, равный максимальному значению В для всех за­ писей.

Так как составляющими документами для данной задачи мо­

жет быть несколько результатных документов других

задач, то

компонента документа определяется как

максимальное

значение

из всех С, полученных при рассмотрении

входящих

результатных

составляющих. Это максимальное значение хранится

в ячейке В.

Определением номера

такта гашения

занимаются блоки 44—

59. Кроме этого, в блоке

25 параллельно

с определением

порядка

компонент строится таблица, где хранится информация о порядке компонент.

Номер такта гашения ТГ определяется для всех документов, используемых в данном отделе.

В основном массиве (векторе) ищется результатный документ, для получения которого используется данный НД, и по таблице порядка компонент определяется порядок этого результатного до­ кумента. Аналогичным образом просматриваются все результатные документы, использующие для своего получения данный НД. Номер такта гашения ТГ определяется как максимальное значение всех рассмотренных В.

Затем НД увеличивается на 1 и следует переход к определе­ нию ТГ для следующего НД. После просмотра для каждого НД производится печать строки следующей таблицы:

Номер компоненты Номер такта гашения

В языке АЛГЭК-С алгоритм второй части анализа потоков информации будет иметь следующий вид:

нач цел мае А[103]; цел НД, КМ, ГД, К; цел М, Н, П, ПС, И, С, В, Ж , ТГ, Р1, Л, С4, ПЕР, У, Я, Г; цел Ы, Т;

цел мае НВ[50]; текст TP вид_ 'С(128)';

текст ТИ вид 'С (128)'; текст ТП вид_ 'С (128)'; цел Т1, ШД;

текст

ВНП вид 'С (128)'; текст

Т2

вид 'С (128)';

текст

Р

вид

'G(IO)';

 

 

 

процедура

ВЫВ(Ь,

Р Е Д ) ;

цел

Ь;

текст РЕД;

нач цел ПЕР ; библ

('2-10ЦЧ', Ь, ПЕР) ; Р Е Д : = П Е Р ; для М : = 2 : 8 цикл

нач если

РЕ Д

[элем

М]= £ 0

то на П11; РЕ Д [элем М ] : = ' ';

Ш 1: кон;

 

 

 

 

 

 

 

12*

 

 

 

 

 

 

179



 

кон;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

библ

('ВВОДЗ',

 

'Г,

А);

Т 2 : = '

 

';

 

 

 

 

 

 

 

 

Т2[элем 30:71] : ^ ' Р Е З У Л Ь Т А Т Ы ОБСЛЕДОВАНИЯ ПОТОКОВ ИН­

 

ФОРМАЦИИ';

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

библ

('АЦПУГ,

Т2);

К М : = — 0 ;

 

 

 

 

 

 

 

 

 

Ц :

Т И : = '

'; Т П : = '

' ; Т Р : = '

 

' ; В Н П : = '

'; Т2 : = '

';

 

 

 

Т2Гэлем_ 30:63] : = ' — ' ;

библ

 

('АЦПУГ, Т2);

 

 

 

 

 

 

ТИГэлем

1 0 : 4 4 ] : = ' И С Х О Д Н Ы М И

ЯВЛЯЮТСЯ

ДОКУМЕНТЫ НО­

 

М Е Р : ' ;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

ТП[элем

10:49] : = ' П Р О М Е Ж У Т О Ч Н Ы М И

ЯВЛЯЮТСЯ

ДОКУМЕНТЫ

 

Н О М Е Р : ' ;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

TP [элем

10:48] : = ' Р Е З У Л Ь Т А Т Н Ы М И

ЯВЛЯЮТСЯ

ДОКУМЕНТЫ

 

Н О М Е Р : ' ;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

ВНП[элем

 

3 0 : 6 3 ] : = ' : Н О М Е Р

ДОКУМЕНТА

: П О Р Я Д О К

ДОКУМЕН ­

 

ТА:';

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

К : = 5 1 ; М : = 5 1 ; Р 1 : = 5 1 ; Н : = 5 3 ; Л : = 5 3 ; П : = 5 3 ; С : = 0 ;

 

 

библ

('АЦПУГ,

 

ВНП);

библ

('АЦПУГ,

Т2);

 

 

 

 

 

Т 2 : = '

'; В : = 0 ; Н Д : = 1;

 

 

 

 

 

 

 

 

 

 

 

БЛЗ:

С Ч : = 0 ; И : = 1;

 

 

 

 

 

то на

 

 

 

 

 

 

 

Б Л 4 :

если

А[И

 

элем

 

2 6 : 3 7 ] = Н Д

БЛ8;

 

 

 

 

 

 

если

А[И

 

элем

 

14:25] =И=0

то _на_ БЛ7;

 

 

 

 

 

 

 

Ы : = Н Д ;

ВЫВ (Ы, Р ) ; ТЩэлем

К:Н] : = Р [ э л е м

8:10];

К : = К + 3 ;

 

Н : = Н + 3 ;

 

если

 

К5&120

то

на

МЗГ,

 

 

 

 

 

 

 

АА:

Т2[элем

54:55] : = С [элем

30:37];

 

 

 

 

 

 

 

 

 

 

Т2[элем

41:43] : = Р [ э л е м

8:10];

 

 

 

 

 

 

 

 

 

 

для Я : =30, 46, 63, цикл Т2[элем Я] : = ' : ' ;

 

 

 

 

 

 

 

библ

('АЦПУГ,

 

Т2);

на

БЛ14;

 

 

 

 

 

 

 

 

 

Б Л 7: С Ч : = С Ч + 1 ;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Б Л 8 :

И: = И + 1;

если А [ И ] ^ К М то_на_БЛ4;

если

С Ч = 1 ,

то

на_ БЛ13;

 

если СЧ = 0 то_на_БЛ15; Ы: = Н Д ;

ВЫВ

(Ы, Р ) ;

 

 

 

 

 

ТП[элем

М : Л ] : = Р [ э л е м

8:10];

 

 

 

 

 

 

 

 

 

 

М : = М + 3 ;

 

Л : = Л + 3 ;

если

М > 1 2 0

то

на

М П ;

 

 

 

БЛ14:

Н Д : = Н Д + 1 ;

на

 

БЛЗ;

 

 

 

 

 

 

 

 

 

 

 

 

 

Б Л 1 3 :

Ы : = Н Д ;

ВЫВ (Ы, Р ) ; TP [элем

Р 1 : П ] = Р [ э л е м

8:10];

П : = П + 3 ;

 

Р 1 : = Р 1 + 3 ;

если

П ^ 1 2 0

_то

_н_а

М21;

на

БЛ14;

 

 

 

Б Л 1 5 : И : = 1; Ж : = 1; П С : = 0 ;

 

 

 

 

 

 

 

 

 

 

 

 

БЛ18:

Н Д : = — А [ И ] ; И : = И + 1 ;

С: = 1;

 

 

 

 

 

 

 

 

 

Б Л 2 1 :

если

А[И

 

элем

 

14:25] ФО

то

на_

БЛ28;

 

 

 

 

 

 

БЛ22:

И : = И + 1 ;

если А[И] ^ 0 то

на_ БЛ21; если

А [ И ] = ^ К М то на

БЛ21;

БЛ25:

Ы : = Н Д [ э л е м

26:37];

ВЫВ

(Ы,

Р ) ;

Т2[элем

41:43]: = Р [ э л е м 8:10];

 

Т2[элем

64

: 55] : = В [ э л е м

34:37];

 

 

 

 

 

 

 

 

 

для Я : =30,46,63 цикл Т2[элем

Я] : = ' : ' ;

 

 

 

 

 

 

библ

('АЦПУГ, Т2); Н В [ Ж

элем

14:25] : = Н Д ;

 

 

 

 

 

Н В [ Ж

элем

26:37]:= В;

Ж : = Ж + 1 ;

 

 

 

 

 

 

 

 

если

П С < В

то

 

на_ БЛ18;

П С : = В ;

на_

БЛ18;

 

 

 

БЛ28:

если

А [И] < 0

то на

БЛ25;

 

 

 

 

 

 

 

 

 

 

 

Г : = И ;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

БЛ30:

С : = С + 1 ;

Ш Д : = — А [ И ] ;

И : = 1;

 

 

 

 

 

 

 

 

 

Б Л 33:

если

А [ И ] = Ш Д

 

то на

БЛ35;

 

 

 

 

 

 

 

 

 

 

И : = И + 1 ;

 

на

БЛЗЗ;

 

 

 

 

 

 

 

 

 

 

 

 

 

Б Л 3 5 :

И : = И + 1 ;

 

если

А [ И ] < 0

то

на

БЛ38;

 

 

 

 

 

 

180


 

если

А [И

элем

14:25] = 0

то на

БЛЗО;

 

на

 

БЛ35;

 

БЛ38:

если

А [ И ] = К М

то

на

БЛ40;

И : = Т + 1 ;

на

БЛ41;

 

Б Л40:

Т 2 : = ' — ' ;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

библ

('АЦПУГ,

Т2);

библ

('АЦПУГ,

ТИ);

 

 

 

 

 

библ

('АЦПУГ,

ТП);

 

библ

('АЦПУГ,

 

Т Р ) ^

на

БЛ44;

Б Л 4 1 :

если

С < В

то

 

на

БЛ43;

В : = С ;

 

 

 

 

 

 

 

 

 

БЛ43:

С: = 1; на БЛ21;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

М П :

библ

('АЦПУГ,

ТП);

М : = 5 1 ;

Л : =53;

на

БЛ14;

 

М21:

библ

('АЦПУГ,

TP);

P I : =51;

П: =53;

на

БЛ14;

 

М31:

б_ибл

('АЦПУГ,

ТИ);

 

К: =51;

Н : = 5 3 ;

на

АА;

 

 

БЛ44:

ТИ [элем

30:66]:='—';

 

библ ('АЦПУГ,

ТИ);

Т И : = '

' ;

 

библ

('АЦПУГ,

ТИ);

 

 

 

 

 

 

 

 

 

 

 

 

 

 

ТЩэлем

3 0 : 6 6 ] : = ' : Н О М Е Р

ДОКУМЕНТА

:НОМЕР

ТАКТА ГАШЕ­

 

Н И Я : ' ;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

библ

('АЦПУГ,

ТИ);

 

 

 

 

 

 

 

 

 

 

 

 

 

 

ТИ[элем 30:60]:='—'; библ ('АЦПУГ,

ТИ);

Н Д : = 1;

БЛ45:

Т Г : = 0 ; И: = 1;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

БЛ47:

если

А [ И ] > 0

 

то

 

на

 

БЛ54;

 

 

 

 

 

 

 

 

 

 

 

Г : = И ;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

БЛ49:

И : = И + 1 ;

если

А[И]=^КМ _ го на БЛ47;

Н Д : = Н Д + 1 ;

 

если

Т Г = 0

то

_н_а КОН;

Н : = Н Д ;

ВЫВ(Ы,

Р ) ;

 

 

ТИ [элем

37:39] : = Р [элем 8:10];

Ы : = Т Г ;

ВЫВ

(Ы, Р ) ;

 

для

Я : =30, 46, 66

цикл

ТЩэлем

Я]

: = ' : ' ;

 

 

 

 

 

ТИ [элем

58 : 60]: = Р [ э л е м

8:10] ;

 

 

 

 

 

 

 

 

 

 

библ

('АЦПУГ,

ТИ); _на БЛ45;

 

 

 

 

 

 

 

 

 

БЛ54:

если

А [И

элем

 

14:25] ^ Н Д _ т о _на

 

БЛ58;

 

 

 

 

Ж : = Ж + 1 ;

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

БЛ56:

если

НВ[Ж

элем

14:25]= А [Г элем

26:37]

то

на

БЛ58;

 

Ж : = Ж + 1 ;

_на

БЛ56;

 

 

 

 

 

 

 

 

 

 

 

 

БЛ58:

если

Т Г > Н В

элем

26:37]

_го

на

 

БЛ49;

 

 

 

КОН:

кощ

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

§

7. 3.

ОПРЕДЕЛЕНИЕ ОБЪЕМОВ ИНФОРМАЦИИ

Алгоритм расчета объемов информации строится в соответст­ вии с методом, изложенным в § 2.5.

Исходными данными для расчета объемов являются матрицы смежности по документам, матрица смежности то задачам, от­ ражающая применимость документов в различных задачах, а также вектор-столбец вхождения задач в тему.

Так как для трансляции алгоритма необходимо указать коли­ чество исходных матриц смежности, то в алгоритме число доку­ ментов в задаче условно принято равным 10. Эта цифра исполь­ зуется только в блоке ввода, сам же алгоритм построен для обще­ го случая.

Расчет объемов информации осуществляется по каждому до­ кументу, по каждой задаче и по теме в целом. При этом отдельно подсчитывается алфавитная информация, отдельно цифровая ин­ формация и их общий объем.

181