ого.
Спосіб пересування точок на екрані був організований за алгоритмом випадкового блукання, тобто пересування по осях Х і Y з кроком в один піксель вибирається випадковим чином.
Померлі своїм життям травоїдні вважаються, як з'їли хижаками. p> При недоїданні обома популяціями, особини помирають у процесі зменшення віку, тобто чим більше вік тварини, тим більше ймовірність загинути від голоду. Через великі проміжних розрахунків облік за недоїдання був обраний
так, що хижаки враховуються один раз на рік, а травоїдні дванадцять разів на рік.
-5 - br/>
2.2 Опис програми.
Дана програма написана з використанням об'єктно-орієнтованої мови Borland Pascal 7.1 і побудована на обробці масивів типу tosob описаного в об'єктному модулі fauna1 . Цей тип має такі параметри:
x - розташування по координаті Х екрана
y - розташування по координаті Y екрана
age - вік точки
col - колір виводу на екран
Програма забезпечує наступні операції:
- Завдання параметрів популяції травоїдних
- Завдання параметрів популяції хижаків
- Завдання параметрів навколишнього середовища
- Перегляд взаємодії тварин у графічному режимі
- Індикація результатів щодо виходу з режиму перегляду
взаємодії тварин
- Вихід з програми
За допомогою зарезервованого слова "uses" до програми підключається стандартні бібліотечні модулі TPCRT , GRAPH , DOS та бібліотечні модулі написані програмістом-розробником MYCRT і FAUNA1 .
У розділі опису констант і змінних були оголошені такі змінні:
- gd, gm типу integer для ініціалізації графіки
- q, x, y, x1, y1, t, i, j, k, at, at1, ct1, ctp типу integer для
використання їх у тілі циклів
- g, m типу integer для завдання початкового кількості тварин
- v, w типу integer для завдання максимального віку тварин
- ct, ch типу shortint для завдання кольору відображуваних точок
- tmin, tmax, hmin, hmax, tp, hp типу integer для завдання чинників
впливають на репродуктивність тварин
- tt типу integer для обліку померлих і з'їдених травоїдних
- kata типу integer для завдання ймовірності природних
катаклізмів
- ht типу integer для завдання кількості травоїдних потрібних
хижакові для їжі
- ttt типу real для завдання кількості трави потрібних
