12150

Модель 2-х процессорной системы

Лабораторная работа

Информатика, кибернетика и программирование

Лабораторная работа № 4 Модель 2х процессорной системы Блоксхема 2 процессорной системы Код отвечающий за моделирование: Memo2.Lines.Add Начало моделирования while flag0 do begin Memo2. Lines. AddinttostrTime {Проверка процессора 1 на наличие задач и решение з

Русский

2013-04-24

83.5 KB

1 чел.

Лабораторная работа № 4

Модель 2-х процессорной системы

Блок-схема 2 процессорной системы

Код отвечающий за моделирование:

Memo2.Lines.Add('Начало моделирования');

while flag0 do

begin

Memo2.Lines.Add(inttostr(Time)+':');

  {Проверка процессора 1 на наличие задач и "решение" задач}

 If p0[0]<>-1 then

 Begin

 inc(p0[1]);

 If p0[1] = ZTO[p0[0]] then

  begin

  Memo2.Lines.Add('>>Задание '+inttostr(p0[0]+1)+' >> Обработанно процессором №1');

  p0[0]:=-1;

  end;

 end;

   {Проверка процессора 2 на наличие задач и "решение" задач}

 If p1[0]<>-1 then

 Begin

 inc(p1[1]);

 If p1[1] = ZTO[p1[0]] then

  begin

  Memo2.Lines.Add('>>Задание '+inttostr(p1[0]+1)+' >> Обработанно процессором №2');

  p1[0]:=-1;

  end;

 end;

  {Обработка очереди}

 If ochered[0]<>-1 then

 begin

  if p0[0]=-1 then

   begin

    p0[0]:=ochered[0];

    p0[1]:=0;

    Memo2.Lines.Add('>>Задание '+inttostr(ochered[0]+1)+' >> Начало обработки процессором №1 (из очереди)');

    ochered[0]:=-1;

   end

   else

  if p1[0]=-1 then

   begin

    p1[0]:=ochered[0];

    p1[1]:=0;

    Memo2.Lines.Add('>>Задание '+inttostr(ochered[0]+1)+' >> Начало обработки процессором №2 (из очереди)');

    ochered[0]:=-1;

   end;

 end;

 If ochered[0]=-1 then

  If ochered[1]<>-1 then

   begin

   ochered[0]:=ochered[1];

   ochered[1]:=-1;

    If ochered[2]<>-1 then

     begin

     ochered[1]:=ochered[2];

     ochered[2]:=-1;

     end;

   end;

  {Начало цикла просмотра Задач поступивших во время Time, с

   целью распределения по процессорам или местам в очереди}

 For i:=0 to N-1 do

 begin

 if ZTP[i]=Time then

  Begin

  if p0[0]=-1 then

   begin

    p0[0]:=i;

    p0[1]:=0;

    Memo2.Lines.Add('>>Задание '+inttostr(i+1)+' >> Начало обработки процессором №1');

   end

   else

  if p1[0]=-1 then

   begin

    p1[0]:=i;

    p1[1]:=0;

    Memo2.Lines.Add('>>Задание '+inttostr(i+1)+' >> Начало обработки процессором №2');

   end

   else

  if ochered[0]=-1 then

   begin

    ochered[0]:=i;

    Memo2.Lines.Add('>>Задание '+inttostr(i+1)+' >> В очереди (место 1)');

   end

   else

  if ochered[1]=-1 then

   begin

    ochered[1]:=i;

    Memo2.Lines.Add('>>Задание '+inttostr(i+1)+' >> В очереди (место 2)');

   end

   else

  if ochered[2]=-1 then

   begin

    ochered[2]:=i;

    Memo2.Lines.Add('>>Задание '+inttostr(i+1)+' >> В очереди (место 3)');

   end

   else

   Memo2.Lines.Add('>>Задание '+inttostr(i+1)+' >> Не может быть обработанно!');

  end;

 end;

   {Конец цикла просмотра Задач поступивших во время Time, с

    целью распределения по процессорам и местам в очереди}

 inc(Time);

if (Time>strtoint(Edit3.Text)) and (p0[0]=-1)

and (p1[0]=-1) {and (ochered[0]=-1) and (ochered[1]=-1)

and (ochered[2]=-1)}then flag0:=false;

end;

Memo2.Lines.Add('Моделирование завершенно...');

Пример


Прибытие заявки

ачало обслуживания

После завершения

Запись время завершения обработки

Записать время прибытия заявки

Заняты ли ЦПУ?

Перевести процессор в состояние «свободно»

Память =  Память -1

Узнать очередное событие

Перевести процессор в состояние «занято»

Память = Память +1

Память = 0 ?

Да

Нет

Да

Нет


 

А также другие работы, которые могут Вас заинтересовать

79113. Социальная структура общества, социальные группы и слои 999 KB
  Социальная группа есть совокупность индивидов, взаимодействующих определенным образом на основе разделяемых ожиданий каждого члена группы в отношении других.
79114. Методика социологического исследования 92.5 KB
  Методика социологического исследования. Программа социологического исследования. Методы социологического исследования наблюдение опрос анализ документов эксперимент. Программа социологического исследования.
79115. Понятие социального института, его характерные признаки 91 KB
  Понятие социальной организации. Формальные и неформальные организации. Это учреждения и организации связанные с осуществлением и распределением политической власти: государство партии армия правоохранительные учреждения профсоюзы политические движения в том числе различные женские молодежные расовые и национальные движения за равноправие женщин за права молодежи национально-освободительные организации. Понятие социальной организации.
79116. Баптистское движение 15.32 KB
  Основные положения вероучения были разработаны бывшим католическим священником Ульрихом Цвингли. В сотериологии Цвингли придерживался учения о спасении через веру в заместительную жертву Христа. Разногласие Цвингли и Лютера Цвингли первым из всех протестантов выступил против благодатных таинств. Цвингли первый богословски обосновал что Евхаристия это знак символ что субстанционально Христос в Евхаристии не присутствует.
79117. Вероучение анабаптистов 14.49 KB
  Они считали что получали личные откровения от Самого Бога и в свете их необходимо толковать Писание. Или только Писание или же что Писание следует толковать в свете внутренних озарений. Во всяком случае каждый человек мог толковать Писание. Писание ставилось в зависимость от внутреннего состояния человека.
79121. Возникновение и распространение адвентизма седьмого дня в мире и в России 17.48 KB
  Название адвентизм происходит от лат. Движение адвентизма зародилось в 30е годы 19 в.движение крое получило название адвентистов.