Курсовая работа: Критерій відношення правдоподібності для великих вибірок

Таблиця значень квантилей для хі – квадрат розподілу з ступенями вільності

0,1	0,3	0,5	0,7	0,9	0,95	0,999	0,9999
0,016	0,148	0,455	1,07	2,71	3,84	6,63	10,8
0,211	0,713	1,39	2,41	4,61	5,99	9,21	13,8
0,584	1,42	2,37	3,67	6,25	7,82	11,3	16,3
1,06	2,20	3,36	4,88	7,78	9,49	13,3	18,5
1,61	3,00	4,35	6,06	9,24	11,1	15,1	20,5
2,20	3,83	5,35	7,23	10,6	12,6	16,8	22,5
2,83	4,67	6,35	8,38	12,0	14,1	18,5	24,3
3,49	5,53	7,34	9,52	13,4	15,5	20,1	26,1
4,17	6,39	8,34	10,7	14,7	16,9	21,7	27,9
4,87	7,27	9,34	11,8	16,0	18,3	23,2	29,6
5,58	8,15	10,3	12,9	17,3	19,7	24,7	31,3
6,30	9,03	11,3	14,0	18,5	21,0	26,2	32,9
7,04	9,93	12,3	15,1	19,8	22,4	27,7	34,5
7,79	10,08	13,3	16,2	21,1	23,7	29,1	36,1
8,55	11,7	14,3	17,3	22,3	25,0	30,6	37,7
9,31	12,6	15,3	18,4	23,5	26,3	32,0	39,3
10,09	13,5	16,3	19,5	24,8	27,6	33,4	40,8
10,9	14,4	17,3	20,6	26,0	28,9	34,8	42,3
11,7	15,4	18,3	21,7	27,2	30,1	36,2	43,8
12,4	16,3	19,3	22,8	28,4	31,4	37,6	45,3
13,2	17,2	20,3	23,9	29,6	32,7	38,9	46,8
14,0	18,1	21,3	24,9	30,8	33,9	40,3	48,3
14,8	19,0	22,3	26,0	32,0	35,2	41,6	49,7
15,7	19,9	23,3	27,1	33,2	36,4	43,0	51,2
16,5	20,9	24,3	28,2	34,3	37,7	44,3	52,6
17,3	21,8	25,3	29,2	35,6	38,9	45,6	54,1
18,1	22,7	26,3	30,3	36,7	40,1	47,0	55,5
18,9	23,6	27,3	31,4	37,9	41,3	48,3	56,9
19,8	24,6	28,3	32,5	39,1	42,6	49,6	58,3
20,6	25,5	29,3	33,5	40,3	43,8	50,9	59,7

Додаток B. Текст програми, що реалізує застосування критерію відношення правдоподібності для великих вибірок

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, Grids, ExtCtrls, Math;

type

TFrm = class(TForm)

GrpBox_HandEnter: TGroupBox;

RdoGrp_CaseEnter: TRadioGroup;

RdBtn_FileRead: TRadioButton;

RdBtn_HandEnter: TRadioButton;

StrGrd: TStringGrid;

Lbl_LevelMean: TLabel;

Cmb_LevelMean: TComboBox;

Lbl_CountValue: TLabel;

Cmb_CountValue: TComboBox;

GrpB_Result: TGroupBox;

Memo_WriteResult: TMemo;

Button1: TButton;

OpnDg: TOpenDialog;

RdB_CompGenerate: TRadioButton;

Edt_Average: TEdit;

Edt_Dispersion: TEdit;

Lbl_Average: TLabel;

Lbl_Dispersion: TLabel;

procedure Button1Click(Sender: TObject);

procedure RdBtn_HandEnterClick(Sender: TObject);