- Кнопка В«ВихідВ» у нижньому правому куті вікна програми;
- Меню, що випадає "Файл" пункт "Вихід";
- Гаряча клавіша В«F4В»;
- Кнопка з хрестиком у верхньому правому куті вікна програми.
БЛОК-СХЕМИ
Рисунок 1 - Узагальнена схема алгоритму
Для обчислення середнього значення фактичних масивів x і y треба два рази звернутися до алгоритму SR з різними параметрами. Тоді схема схеми алгоритму блоку: А-В буде мати вигляд, зображений на малюнку 2. br/>В
Рисунок 2 - Алгоритм обчислення середнього значення елементів масиву
В
Рисунок 3 - Алгоритм обчислення середніх значень масивів x і y
В
Рисунок 4 - Алгоритм обчислення дисперсії
В
Рисунок 5 - Алгоритм обчислення середньоквадратичних відхилень
В
Малюнок 6 - Алгоритм обчислення коефіцієнта парної кореляції
ТЕКСТ ПРОГРАМИ
# include
# pragma hdrstop
# include "Unit1.h"
# include "Unit2.h"
# include "Unit3.h"
// ---------------------------------------- -----------------
# pragma package (smart_init)
# pragma resource "*. dfm" * Form1;
// ---------------------------------------- -----------------
__fastcall TForm1 :: TForm1 (TComponent * Owner)
: TForm (Owner)
{}
// ---------------------------------------- ----------------- __fastcall TForm1 :: N5Click (TObject * Sender)
{-> Close ();
}
// ---------------------------------------- ----------------- rasch ()
{x; y; n, xsum, ysum, xs, ys; qx, qy, r, wx, wy; = 0; = 0; = 0; = 0; sumy; sumx; = 0;
= 0; = 0; = 0; = 0; = 16; str, str1; (unsigned int i = 0; i <16; i + +)
{= Form1-> Memo2-> Lines-> Strings [i]; = StrToFloat (str); + = x;// suma elementov x = Form1-> Memo3-> ; Lines-> Strings [i]; = StrToFloat (str1); + = y;// suma elementov y
} = (xsum/n);// srednee xxsumer = SimpleRoundTo (xs, -3); = (ysum/n);// srednee yysumer = SimpleRoundTo (ys, -3); - > Label11-> Caption = xsumer; -> Label12-> Caption = ysumer; (unsigned int i = 0; i <16; i + +)
{= Form1-> Memo2-> Lines-> Strings [i]; = StrToFloat (str); =...
