5.470 19484.224 0
32 26 104 1 19.397 2014 2.940 20338.502 0
32 26 102 2 19.377 2051 7.082 20927.424 0
32 27 102 1 19.313 2044 9.027 20651.492 0
32 27 109 1 19.232 1905 6.032 19232.477 0
32 26 106 1 19.172 1953 3.856 19719.893 0
32 26 103 1 19.134 2006 2.414 20259.105 0
32 26 103 1 19.028 1995 1.910 20147.517 0
31 26 107 2 18.962 1913 9.570 19504.133 0
31 26 101 2 18.936 2024 8.502 20657.562 0
31 26 97 1 18.881 2102 2.114 21241.095 0
31 26 95 1 18.830 2140 6.637 21634.367 0
де: - назва черги; - число входів; (0) - число нульових входів;. TIME - середній час перебування транзакта в черзі; - максимальне вміст;. CONT - середнє число входів
результати функціонування накопичувачів BASKT, CART, PARK:
70 36 0 39 111 1 20.557 0.294 0 0650 186 0 586 1673 1 402.570 0.619 0 0650 138 0 636 1788 1 440.170 0.677 0 0
де: - назва накопичувача; максимальна місткість;. C - середня місткість; - число входів;
UTIL - коефіцієнт використання;
) кількість покупців супермаркету в хвилинний інтервал - представлено на гістограмі малюнка 3.2.
Рис. 3.2
) кількість покупців у всіх 17-ти чергах (рис. 3.3 - 3.7)
Рис. 3.3
Рис. 3.4
Рис. 3.5
Рис. 3.6
Рис. 3.7
Висновки
Із звіту по накопителям Storage ми бачимо, що максимальна кількість машин ніколи не досягла встановленого ліміту. Таким чином, завжди була достатня кількість паркувальних місць, кошиків та візків.
Проте, дуже велика кількість покупців (380) стояло в чергах перед касою. У черзі вони проводили, в середньому, більше часу, ніж в процес здійснення покупок.
Таблиця Shoppers надає гістограму покупців у супермаркеті, підраховуваних кожну хвилину. У середньому, кожну хвилину в магазині перебували 380 покупців. Практично всі вони очікували своєї черги на касі.
Додаток
unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl. ExtCtrls, VCLTee.TeEngine, VCLTee.TeeProcs, VCLTee.Chart, VCLTee.Series;
type=class (TForm): TLabeledEdit;: TLabeledEdit;: TButton;: TLabeledEdit;: TLabeledEdit;: TLabeledEdit;: TLabeledEdit;: TChart;: TLabeledEdit;: TLineSeries;: TChart;: TLineSeries; : TButton; Button1Click (Sender: TObject); Button2Click (Sender: TObject);
{Private declarations}
{Public declarations};: TForm1;
{$ R *. dfm} TForm1.Button1Click (Sender: TObject);
dt=0.001;// Ін...
