Имитационное моделирование работы парикмахерской

2. «Машинные имитационные эксперименты с моделями экономических систем» под ред. Нейлера;

3. Кеольтон В., Лод А. «Имитационное моделирование. Классика CS» издание 3-е, 2004г.;

4. Варфоломеев В.И. «Алгоритмическое моделирование элементов экономических систем». - М.: Финансы и статистика, 2000г.

5. Клейнрок Л. «Теория массового обслуживания.»-М.: Машиностроение,1979.-432 с.

6. При

цкер А. «Введение в имитационное моделирование»-М.: Мир,1987.-644с.

7. Емельянов А.А.,Власова Е.А., «Имитационное моделирование экономических процессов» - М. Финансы и статистика,2002.

8. Соболь И.М. «Численные методы Монте-Карло».-М.Наука,1973.

9. Бахвалов Н.С. «Численные методы» – М.: Наука, 1973

Приложение

Программа, реализующая моделирование работы Парикмахерской.

#include<iostream.h>

#include<math.h>

#include<conio.h>

#include<stdlib.h>

#include<stdio.h>

#define VACANCY (-1)

#define T (200*8*60)

#define RCLIENTS x1[discrete(p1)]

float x1[]={7,8,9,10,11,12,13,14,15};

float p1[]={0.05,0.05,0.05,0.2,0.2,0.2,0.05,0.05,0.15};

#define RCOST x2[discrete(p2)]

float x2[]={10,12,13,14,15,16,17,18,19};

float p2[]={0.05,0.05,0.05,0.05,0.05,0.2,0.2,0.2,0.15};

#define a 3

#define L 10

#define RAND (125*125*125*125*5)

float rand1(void)

{

static unsigned long int u=RAND;

u*=RAND;

return u/(float(0xFFFFFFFF)+1.0);

}

unsigned int discrete(float p[])

void main (void)

{

unsigned long int i,j,cost,k,n,r,R;

float t,tin;

n=0; k=0; R=0;

for(t=RIN;t<T;t+=RIN)

{

i=RCLIENTS;

n+=i;

for(;i<RCLIENTS;i++)

if(rand1()<=P)

{

cost=cost+a*RCOST;

k++;

}

}

cout<<"Posetili parikmaherskuu"<<n<<"chel"<<endl;

cout<<"Iz nih obslugeno "<<k<<"chel"<<endl;

cout<<"Iz nih ne obslugeno"<<r<<"chel"<<endl;

cout<<"Viruchka"<<R<<"rub"<<endl;

cout<<"Srednei dlina ocheredi"<<L<<"chel"<<endl;

}

 Скачать реферат