Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
сетевое планированрнрнрние.docx
Скачиваний:
113
Добавлен:
17.02.2016
Размер:
449.26 Кб
Скачать
  • Составить обоснованный план выполнения комплекса работ, более эффективно по заданному критерию использовать ресурсы;

  • Проводить многовариантный анализ разных решений с целью улучшения плана; список использованной литературы

  1. Алексинская, Т.В. Учебное пособие по решению задач по курсу "Экономико-математические методы и модели" [Текст]. Таганрог: ТРТУ, 2009. –153 с.

  2. Вентцель, Е.С. Исследование операций [Текст] М, Советское радио, 2012.

  3. Заболотский, В.П., Оводенко, А.А., Степанов, А.Г. Математические модели в управлении: Учеб. Пособие [Текст] СПбГУАП. СПб.: 2010, 196с.: ил.

  4. Ивасенко, А.Г. Управление проектами: учебное пособие [Текст] А.Г. Ивасенко, Я.И.Никонова, М.В.Каркавин, – Ростов на Дону.:Феникс, 2009. – 330 с. – Высшее образование.

  5. Кудрявцев, Е.М. Microsoft Project. Методы сетевого планирования и управления проектом. [Текст] – М.: ДМК Пресс, 2011. – 240 с., ил.

  6. Мазур, И.И., Шапиро В.Д., Ольдерогге, Н.Г. Управление проектами: Ученое пособие [Текст – М.: Омега-Л, 2009. – с. 664.

  7. Тынкевич, М.А. Экономико-математические методы (исследование операций) [Текст]. - Кемерово, 2010. -177 c.

Приложение а

Рисунок 4 - Фрагмент сети "вершина-работа"

Рисунок 5 - Фрагмент сети "вершина-событие"

Продолжение прил. А

Рисунок 6 - Условные обозначения в сетевом графике

Рисунок 7 - Диаграмма Ганта

Продолжение прил. А

Рисунок 8 - Циклограмма а) равноритмичного и б) неритмичного потока.

Рисунок 9 - Расчет по методу критического пути

Рисунок 10 - Гистограмма метода Монте-Карло

Рисунок 11 - Табличная форма для метода диагональной таблицы

Продолжение прил. А

Рисунок 12 - Секторный метод

Приложение б

Листинг программы:

program prog;

uses

SysUtils;

const

n0 = 30;

var

ves : array [1..n0, 1..n0] of integer;

L : array [1..n0, 1..n0] of integer;

M : array [1..n0] of integer;

i,j,fl,n,q, max: integer;

f:text;

Procedure krit;

var k:integer;

begin Max:=0;

for k:=1 to n do

begin

if l[k,i] <> 0 then

begin fl:=fl+1;

if MAX < l[k,i] then

begin

MAX:=l[k,i];

m[i]:=k;

end;

end;

end;

End;

Продолжение прил. Б

begin

assign(f,'graf.txt');

reset(f);

readln(f,n);

for i:=1 to n do

for j:=1 to n do read(f, ves[i,j]);

close(f);

writeln;

writeln('Matrica vesov zadannogo grafa');

for i:=1 to n do

begin

for j:=1 to n do write (ves[i,j],' ');

writeln;

end;

writeln;

for i:= 1 to n do

begin

for j:= 1 to n do

l[i,j]:=0;

M[i]:= 0;

end;

fl:=0;

for j:= 1 to n do begin

for i:= 1 to n do

begin krit;

if ves[i,j]<>0 then l[i,j]:= ves[i,j] + max;

fl:=0; end

end;

Продолжение прил. Б

Writeln;

writeln('L');

for i:=1 to n do begin

for j:=1 to n do write(l[i,j],' ');

writeln;

end;

q:=0;

writeln;

writeln ('Kriticheskii put v zadannom grafe:');

write (n,' ');

i:=n;

repeat

write (m[i],' ');

i:=m[i];

until m[i]=0;

writeln;

q:=0;

for j:=1 to n do begin

if q < l[j,n] then q:= l[j,n];

end;

writeln;

Writeln('Dlina kriticheskogo puti = ',q,'.');

readln;

end.