50692

Построение аналитической и имитационной модели

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

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

Построить аналитическую и имитационную модели и сравнить результаты исследования Одноканальная СМО с неограниченной очередью Исследовать значения средней длины очереди, среднего времени ожидания в очереди при показательном и равномерном (a = 0.05, b =0,75) распределении входного потока.

Русский

2014-01-28

114.5 KB

9 чел.

Цель:

Построить аналитическую и имитационную модели и сравнить результаты исследования

Одноканальная СМО с неограниченной очередью

               =2.5                                     =3

   

Исследовать значения средней длины очереди , среднего времени ожидания в очереди при показательном и равномерном (a = 0.05, b =0,75) распределении входного потока.                                                 

Выполнение  лабораторной работы:

Построение аналитической модели

Скриншоты программы

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

namespace laba4_model

{

   public partial class Form1 : Form

   {

       double l = 2.5;

       double m = 3.0;

       double ostatok=0;

       int ochered = 0;

       //double ostat_och = 0;

       double sr_dlina_och = 0;

       double sr_time_ogid = 0;

       int col_uvilich = 0;

       double[] col = new double[10000];

       List<int> series = new List<int>();

       int n=100;

       int znach;//kolvo sozdaniya ocheredei

       int znacht;//

      // bool flag = false;//dly nachala uvelicheniya kol-vo ocheredei

       bool ind = true;

       double time=0;

       Random rand;

       public Form1()

       {

           InitializeComponent();

           rand = new Random();

           label6.Text = "Кол-во обращений = " + n.ToString();

           label8.Text = "l = " + l.ToString();

           label9.Text = "m = " + m.ToString();

           znacht = 0;

       }

       double eksp(double tmp)

       {

           return -Math.Log(rand.NextDouble()) / tmp;

       }

       double ravn()

       {

           return l+(m-l)*rand.NextDouble() ;

       }

       private void button1_Click(object sender, EventArgs e)

       {

           double temp;

           double ogid, obrab;

           //ochered = 0;

           if (ind)

           {

               ogid = eksp(l);

               obrab = eksp(m);

           }

           else

           {

               ogid = ravn();

               obrab = ravn();

           }

           if (obrab > ogid)

           {

               temp = (obrab - ogid);

               ostatok = ostatok + temp;

               time = time + ostatok;

                 if (ostatok >= ogid)

               {

                   ostatok = ostatok - ogid;

                   time = time + ostatok;

                   col[ochered] = ogid;

                   ochered++;

                   for (int i = 0; i < ochered; i++)

                       time = time + col[i];

                       col_uvilich = ochered;

                   

               }

               else

               {

               }

           }

           else

           {

               

               if (ostatok>0)

               {

                   temp = (ogid - obrab);

                   ostatok = ostatok - temp;

                   

                   

                   if (ochered>0)

                   {

                       

                       ostatok = ostatok + col[ochered];

                       time = time + ostatok;

                       for (int i = 0; i < ochered; i++)

                           time = time + col[i];

                       ochered--;

                       col_uvilich = ochered;

                   }

                   else

                   {

                   }

               }

               else

               {

               }

           }

                   series.Add(col_uvilich);

                   col_uvilich = 0;

                   znach++;

           n++;

           sr_dlina_och = series.Sum() / /*(double)*/znach;

           sr_time_ogid = (double)time / (double)znach;

           temp = ogid - obrab;

           label1.Text ="Ожидание прих. заявки = "+ ogid.ToString();

           label2.Text = "Обработка заявки = " + obrab.ToString();

           label3.Text = "Общий остаток = " + ostatok.ToString();

           label4.Text = "Кол-во заявок в очереди = "+ochered.ToString();

           label5.Text = "Текущий остаток = " + temp.ToString();

           label7.Text = "Средняя длина очереди = " + sr_dlina_och.ToString();

           label6.Text = "Кол-во обращений = " + n.ToString();

           label10.Text = "Среднее время ожидания = " + sr_time_ogid.ToString();

       }

       private void button2_Click(object sender, EventArgs e)

       {

           ochered = 0;

           col_uvilich = 0;

           znach=0;

           time = 0;

           sr_time_ogid = 0;

           label6.Text = "Кол-во обращений = " + n.ToString();

           for (int i = 0; i < n; i++)

           {

               double temp;

               double ogid, obrab;

               if (ind)

               {

                   ogid = eksp(l);

                   obrab = eksp(m);

               }

               else

               {

                   ogid = ravn();

                   obrab = ravn();

               }

               if (obrab > ogid)

               {

                   temp = (obrab - ogid);

                   ostatok = ostatok + temp;

                   

                   if (ostatok >= ogid)

                   {

                       ostatok = ostatok - ogid;

                       time = time + ostatok;

                       col[ochered] = ogid;

                       ochered++;

                       for (int j = 0; j < ochered; j++)

                           time = time + col[j];

                       col_uvilich = ochered;

                   }

                   else

                   {

                   }

               }

               else

               {

                   if (ostatok > 0)

                   {

                       temp = (ogid - obrab);

                       ostatok = ostatok - temp;

                       if (ochered > 0)

                       {

                           ostatok = ostatok + col[ochered];

                           time = time + ostatok;

                           ochered--;

                           for (int j = 0; j < ochered; j++)

                               time = time + col[j];

                           col_uvilich = ochered;

                           //flag = true;

                       }

                       else

                       {

                       }

                   }

                   else

                   {

                   }

               }

                   {

                       series.Add(col_uvilich);

                       col_uvilich = 0;

                       znach++;

                   }

               if (i == n - 1)

               {

                   temp = ogid - obrab;

                   int summa = series.Sum();

                   sr_time_ogid = (double)time / (double)znach;

                   sr_dlina_och = /*(double)*/summa / /*(double)*/znach;

                   sr_time_ogid = sr_time_ogid ;

                   label1.Text = "Ожидание прих. заявки = " + ogid.ToString();

                   label2.Text = "Обработка заявки = " + obrab.ToString();

                   label3.Text = "Общий остаток = " + ostatok.ToString();

                   label4.Text = "Кол-во заявок в очереди = " + ochered.ToString();

                   label5.Text = "Текущий остаток = " + temp.ToString();

                   label7.Text = "Средняя длина очереди = " + sr_dlina_och.ToString();

                   label10.Text = "Среднее время ожидания = " + sr_time_ogid.ToString();             

               }

               

           }

           series.Clear();

           col_uvilich = 0;

          // n = 0;

       }

       private void button3_Click(object sender, EventArgs e)

       {

           if (textBox1.Text != "")

           n = Convert.ToInt32(textBox1.Text);

           label6.Text = "Кол-во обращений = " + n.ToString();

           znach = 0;

           znacht = 0;

           time = 0;

           ochered = 0;

           ostatok = 0;

           sr_time_ogid = 0;

           label10.Text = "Среднее время ожидания = " + sr_time_ogid.ToString();

           //flag = false;

           series.Clear();

       }

       private void button4_Click(object sender, EventArgs e)

       {

           if (textBox2.Text != "")

           l = Convert.ToDouble(textBox2.Text);

           if (textBox3.Text != "")

           m = Convert.ToDouble(textBox3.Text);

           if (ind)

           {

               label8.Text = "l = " + l.ToString();

               label9.Text = "m = " + m.ToString();

           }

           else

           {

               label8.Text = "a = " + l.ToString();

               label9.Text = "b = " + m.ToString();

           }

       }

       private void button5_Click(object sender, EventArgs e)

       {

           if (ind)

           {

               button5.Text = "Изменить на показательное";

               l = 0.05;

               m = 0.75;

               ind = false;

              

           }

           else

           {

               

               button5.Text = "Изменить на равномерное";

               l = 2.5;

               m = 3.0;

               ind = true;

           }

           if (ind)

           {

               label8.Text = "l = " + l.ToString();

               label9.Text = "m = " + m.ToString();

           }

           else

           {

               label8.Text = "a = " + l.ToString();

               label9.Text = "b = " + m.ToString();

           }

       }

   }

}

6


 

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

37612. Проведение экспериментальных работ при исследовании переходных процессов в электрических цепях 115 KB
  На экране осциллографа получаем изображение зависимости напряжения и тока конденсатора от времени.Зарисовываем осциллограммы тока и напряжения на конденсаторе: Рассчитываем по осциллограмме постоянные времени разряда и заряда конденсатора по кривой uсt. На экране осциллографа получаем изображения зависимости тока и напряжения катушки от времени. Зарисовываем осциллограммы тока и напряжения катушки: Рассчитываем по осциллограмме постоянные времени при подключении и отключении катушки по кривой it.
37613. История государства и права зарубежных стран (ИГПЗС) 712 KB
  В силу конкретноисторического подхода к государственноправовым явлениям и процессам присущим тому или иному обществу на том или ином этапе его развития оперируя множеством фактов и событий политической жизни деятельности государств правительств классов и партий ИГПЗС ставит своей целью выявление исторических закономерностей развития государства и права. ИГПЗС тесно связана с другой юридической наукой и учебной дисциплиной Теорией государства и права также изучающей закономерности развития государства и права. Теория...
37614. Основи теорії транспортних процесів і систем 4.22 MB
  У цьому розділі вивчаються питання стосовно експлуатаційних властивостей транспортних засобів що використовуються для організації процесу перевезення вантажів та пасажирів. В країнах Азії до цих пір переміщення вантажів та людей за допомогою коромисел є дуже розповсюдженим. В умовах первинно общинного ладу для транспортування людей та вантажів використовувались найпростіші засоби включаючи в'ючних тварин. На сьогодні транспорт це одна із найважливіших галузей матеріального виробництва що виконує перевезення людей та вантажів.
37615. Программирование на языке ассемблера для микропроцессоров фирмы Intel 411.5 KB
  Программист или любой другой пользователь может использовать любые высокоуровневые средства вплоть до программ построения виртуальных миров и возможно даже не подозревать что на самом деле компьютер выполняет не команды языка на котором написана его программа а их трансформированное представление в форме скучной и унылой последовательности команд совсем другого языка машинного. шесть регистров сегментов: cs ds ss es fs gs; регистры состояния и управления: регистр флагов eflags flags; регистр указателя команды eip ip. Его...
37616. Тезисы лекций по маркетингу 534.5 KB
  В этой ипостаси маркетинг существует несколько тысяч лет когда произошло отделение купца негоцианта от производителя товара ремесленника. Производственная: Разработка ассортимента новых продуктов; Разработка требований к новым товарам Сбытовая: Выбор каналов сбыта. Сравнительный анализ сбытовой и современной концепций маркетинга Сбытовая Современный маркетинг Учет потребностей Предприятия Потребителей Производится то что Удается произвести Что будет куплено Ассортимент Узкий Широкий Горизонт планирования Краткосрочный Длительный...
37617. Бег с барьерами 15.99 KB
  Дисциплины: Зимний сезон : 50 метров 60 метров Летний сезон : 100 метров женщины 110 метров мужчины 400 метров История Первые упоминания об официальных стартах в барьерном беге относятся к соревнованиям в Англии в 1837 году в колледже Итон. Олимпийский дебют на дистанции 110 метров с барьерами состоялся в 1896 году.
37618. Горный бег 18.2 KB
  Классификация трасс по критерию набор высоты Категория А: набор высоты составляет как минимум 76 метров 250 футов на каждую милю 16 км дистанции; по шоссе проходит не более 20 от общей длины трассы; трасса должна быть длиной не менее одной мили 16 Категория В: набор высоты составляет как минимум 38 метров 125 футов на каждую милю 16 км дистанции; по шоссе проходит не более 30 от общей длины трассы; Категория С: набор высоты составляет как минимум 304 метра 100 футов на каждую милю 16 км дистанции; по шоссе проходит не...
37619. Михаил Сергеевич Горбачёв 42.26 KB
  Как обычные люди становятся историческими личностями, что выделяет их из общего ряда? То, что отличает от остальных, - исключительные способности, энергия, честолюбие, жажда власти, приверженность идеалу, или, напротив, безоглядный цинизм, беспринципность, или то, что с ними связывает
37620. Слагаемые профессионального имиджа педагога 135.5 KB
  Теоретические основы исследования проблемы имиджа педагога. Понятие и структура имиджа. Профессиональный имидж педагога. Создание имиджа учителя. Рекомендации и памятки для учителей...