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 ?

Да

Нет

Да

Нет


 

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

64228. Органы чувств и сенсорные способности низших многоклеточных беспозвоночных 28 KB
  Предполагается что первичные органы чувств вообще обладали лишь общей присущей всей живой материи чувствительностью но в повышенной степени. Согласно приведённой гипотезе все органы чувств многоклеточных животных развились из наименее дифференцированных осязательных рецепторов.
64229. Общая характеристика моторной активности низших многоклеточных беспозвоночных 25.5 KB
  Большинство же червей ползают и роются в придонном иле проглатывая его вместе с органическими остатками или собирают с поверхности дна мелких животных и мёртвые организмы. У кольчатых червей впервые в эволюции животного мира появляются настоящие парные конечности...
64230. Таксисы у низших беспозвоночных 26 KB
  Кюн выделил следующие категории высших таксисов которые в полной мере развиты лишь у высших животных: тропотаксисы телотаксисы менотаксисы и мнемотаксисы. Низшим беспозвоночным свойственны в разной степени только первые три формы высших таксисов. Особенно значимы эти два вида таксисов для хищников.
64231. Характеристика моторной активности животных с низшим уровнем развития перцептивной психики (на примере насекомых) 24 KB
  Членистоногие являются первыми наземными животными в истории Земли. Переход на сушу был сопряжён с развитием особых органов передвижения – конечностей в виде сложных рычагов, состоящих из отдельных, соединённых суставами, члеников.
64232. Характеристика сенсорной активности животных с низшим уровнем развития перцептивной психики (на примере насекомых) 28 KB
  Дело в том что зрительные рецепторы у насекомых очень лабильны и за единицу времени у них формируется больше последовательных образов чем у позвоночных. Таким образом характеризуя способности насекомых также как и головоногих моллюсков к оптическому...
64233. Таксисы 24.5 KB
  Насекомые обладают всеми примитивными формами таксисов особенно на стадии личинок хемотаксисы фототаксисы клинотаксисы и так далее однако у взрослых насекомых чаще всего встречаются чётко выраженные высшие таксисы.
64234. Инстинкт и научение в поведении насекомых 26 KB
  Можно считать что научение у них стоит на службе у инстинктивного поведения обеспечивая пластичность инстинктивных действий. Неизменных форм поведения нет даже там где прежде всего требуется стереотипность а именно в сигнальных позах и телодвижениях.
64235. Общая характеристика высшего уровня развития перцептивной психики 25.5 KB
  Представители этих наиболее совершенных в эволюционном плане видов способны к предметному восприятию однако наиболее полно эта способность развита только у позвоночных.
64236. Характеристика двигательных способностей высших позвоночных 30 KB
  У высших позвоночных эта сегментарность уже нарушена что связано с выполнением сложных движений. В ходе эволюции наибольшие преимущества имели животные с разнообразными реакциями в том числе с большим набором элементарных двигательных координаций с лучшей дифференцированностью и точностью движений.