ог до размещения здійсненніх файлів;
Мінімальні вимоги до апаратного забезпечення:
В· IBM-Сумісний комп'ютер, що не нижчих Pentium III, RAM-512Mb, SVGA-монітор 17 дюймів, Вільний простір на жорсткий диск біля 3 Мб.
4.2 Розробка логіко-функціональної схеми системи
У загально вігляді логіко-функціональну роботи системи можна представіті Наступний чином (рис. 4.1).
В
Рис. 4.1 Логіко-функціональна схема роботи системи
.3 Математичні основи розрахунку координат точок Перетин Кіл
Нехай задані два кола, перше з центром у точці 1 з координатами X1, Y1 и радіусом R1. Друге з центром у точці 2 з координатами X2, Y2 и радіусом R2. У точках Перетин знаходяться шукані точки 3 і 4 з координатами, відповідно X3, Y3 и X4, Y4. Центральна точка 0 - точка Перетин всех ліній, з координатами X, Y.
В
Рис. 4.2 Координати точок Кіл, что перетінаються
Розглянемо два прямокутні ТРИКУТНИК 103 и 203 Із загально катетом 03. Гіпотенузі нам відомі - це радіусі R1 и R2 (рис. 4.3). p align="justify"> У розрахунках, что наведені надалі Приймаємо наступні Умовні позначення: - відстань между центрами Кіл; - відстань від точки Перетин всех ліній до точок Перетин Кіл; - відстань від центру Першого кола до точки Перетин всех ліній; - відстань від центру іншого кола до точки Перетин всех ліній.
Знаючий координат та X1, Y1 и X2, Y2 легко можна найти відстань D между ними:
(4.1)
В
Рис. 4.3 Схема знаходження координат точок Перетин
одержимість умову Перетин Кіл:
(4.2)
Відрізок H загальний, це означає, что можна Скласти Наступний систему рівнянь:
(4.3)
Звідсі знаходимо наступні вирази. Відстань від центру іншого кола до точки Перетин всех ліній:
(4.4)
Відстань від центру Першого кола до точки Перетин всех ліній:
(4.5)
Відстань від точки Перетин всех ліній до точок Перетин Кіл:
(4.6)
Координати центру Перетин всех ліній:
(4.7)
Координати точок Перетин Кіл:
(4.8)
4.4 Розробка алгорітмів та програмна реалізація
Розглянемо спочатку основні процедури, за помощью якіх реалізовано взаємодію користувача з системою. Побудова зерен крісталізації на мапі области побудова відбувається Наступний чином. br/>
procedure Tmain.Image1MouseDown (Sender: TObject; Button: TMouseButton;: TShiftState; X, Y: Integer); flag then exit; // ЯКЩО запущених режим моделювання додаваті Нові зерна заборонено
