Курсовая работа: Розподіл Пуасона

- ВИХІД.

При виборі певної опції активізується відповідна процедура. Завершення роботи програми і повернення в середовище системи програмування Turbo Pascal здійснюється при натисканні клавіші Esc, що відповідає вибору опції «ВИХІД». Програма здійснює побудову теоретичного варіаційного ряду та перевіряє гіпотезу про розподіл Пуассона генеральної сукупності за критерієм згоди Пірсона‚ виводить результати обчислень та висновок щодо гіпотези на екран дисплею.

Опишемо процедури програми PUASSONS.PAS.

Процедура VVID . Призначення - ввід емпіричного варіаційного ряду‚ впорядкування емпіричного ряду за зростанням. Процедура викликається з головного меню програми при виборі пункту «ВВІД» шляхом натискання функціональної клавіші F2.

Після впорядкування емпіричного масиву даних процедура припиняє роботу і повертає керування в програму. Процес виконання процедури представлено екранною копією (див. додаток 1).

Процедура OBCHYSL . Призначення - групування емпіричних даних в інтервали‚ підрахунок емпіричних частот‚ обчислення вибіркових характеристик - середньої‚ вибіркової дисперсії та середнього квадратичного відхилення. Процедура викликається з головного меню програми при виборі пункту «РОЗРАХУНОК» (функціональна клавіша F3). Після обчислення вибіркових статистик та виводу їх на дисплей процедура передає керування головному блокові програми.

Блок схема процедури представлена в додатку 3.

Процедура VYVID . Призначення - обчислення значення критерію за формулою (6)‚ вивід результату обчислень на екран на дисплею‚ перевірка гіпотези про розподіл Пуассона емпіричного варіаційного ряду. Процедура викликається з головного меню програми при виборі пункту «ВИВІД» (функціональна клавіша F4). Результат роботи процедури представлено не екранній копії (див. додаток 5). Для отримання друкованого результату потрібно натиснути клавішу PrtScr (при роботі в режимі MS DOS) або комбінацію клавіш Shift+PrtScr (при роботі з ОС Windows 3.xx, Windows 9x).

Функція FAKT використовується для обчислення значення n ! .

Головний блок програми реалізовано у вигляді горизонтального меню з використанням функціональних клавіш. Вибір опції меню здійснюється за допомогою натискання відповідної функціональної клавіші‚ вихід з меню (а тим самим і з програми) здійснюється при натисканні клавіші Esc. Блок-схема головного блоку програми подано в додатку 2.

2.2Опис програми

Програма складена‚ відкомпільована і відлагоджена в середовищі Turbo Pascal 6.0.

Оператори програми мають таке призначення:

001 Заголовок програми

002 Підключення зовнішніх модулів Crt та Printer

003 Опис типованої змінної для збереження емпіричних даних

004 Опис робочих змінних програми

005 Процедура CLEAN - очистка вікна екрану починаючи з 7 і закінчуючи 20 стрічкою

006-012 Процедура FAKT - обчислення значення n!

013 Заголовок процедури VVID

014 Початок процедури

015-018 Ввід обсягу вибірки

021-027 Ввід елементів емпіричного ряду та їх частот

028 Підрахунок обсягу вибірки

030 Кінець процедури VVID

031 Заголовок процедури OBCHYSL

032 Початок процедури

033-035 Присвоєння початкових значень для обчислення вибіркової середньої та вибіркової дисперсії

036-040 Обчислення середньої зваженої та вибіркової дисперсії

042 Обчислення згладженої вибіркової дисперсії