Pi/180))); (ZemX, ZemY, StAngle, EndAngle, abs (XRad), round (PressZem * ZemPix)) ;; i:=2 to 7 do {малювання паралелей}:=abs (Round (ZemPix * sin (i * Pi/9) ));
{велика Піввісь еліпса паралелі}:=Round (ZemPix * PressZem * cos (i * Pi/9));
{висота паралелі над площинах ЕКВАТОР}:=ZemY + UpDown; {Координата Y центру еліпса паралелі} (LightBlue); (ZemX, ParallelY, 0, 360, XRad, Round (Naklon * XRad));
{затінена частина паралелі} (White); (ZemX, ParallelY, Grad + 220, Grad + 400, XRad, Round (Naklon * XRad));
{освітлена частина паралелі};
Малювання протуберанців здійснюється процедурою:
RandSeed:=VisualPage mod 12; i:=1 to 250 do:=(1-sqr (Random)) * Pi/2;:=RadSun + Round ((20) * sin (Projection )) - 15;:=2 * Pi * Random + VisualPage/20;:=310 + Round (XRad * cos (PolUgol));:=160 + Round (Compress * XRad * sin (PolUgol)); (PixelX, PixelY, LightRed);
2.5 Інструкція користувача
Для запуску програми нужно:
файл KURSOV2.PAS з програмою копіюваті в папку Мої документи
Відкрити середовище програмування TURBO PASCAL або School Pak. далі нужно Відкрити файл KURSOV2.PAS з програмою.
после того, коли програма Вже Відкрита, нужно запустіті ее на виконан помощью клавіш Ctrl + F9 после цього ми спостерігаємо з'явиться на моніторі тітульної Сторінки через Деяк годину з являється напис для переходу на іншу сторінку.
после натіскання кнопки Enter ми спостерігаємо самий процес Обертаном планет вокруг Сонця.
для вихода з програми знову натіскаємо кнопку Enter.
Таким чином, програму можна запускаті НЕОБМЕЖЕНИЙ Кількість разів.
Космічний екліптіка алгоритм программа
3. Результати роботи програми та контрольні приклада
На даного малюнку 3.1 зображена титульний сторінка до програми:
Малюнок 3.1 - титульний сторінка
Виконання програми, яка демонструє рух планет вокруг Сонця подано на малюнку 3.2
Рисунок 3.2 - Програма руху планет вокруг Сонця
Висновки
Виконаю Дану курсову роботу я получил програму, что будує дінамічне зображення: рух планет вокруг Сонця. Оскількі программа виконан на мові програмування TURBO PASCAL це Забезпечує Їй Широке коло использование. Програма НЕ є вимогливий до ресурсов ПК, як технічних так и до програмного забезпечення. Програма служити для Демонстрації руху планет Сонячної системи. Може буті Використана в повсякдення жітті, у навчанні, чи просто з пізнавальною метою.
Во время создания програми я Вівче много НОВИХ процедур та обробніків для создания анімації, графічних про єктів.
На Цій курсовій работе я удосконалів свои вміння у роботі з TURBO PASCAL, а самє:
· удосконалів свои навички зі создания графічних про єктів в TURBO PASCAL;
· удосконалів навички в роботі з текстом в TURBO PASCAL, его Довільне размещения на странице;
· працював з різнімі стиль написання, розміру та кольору тексту;
· удосконалів навички побудова блок-схем;
· закріпів навички в розробці алгоритмів и роботи з анімацією.
Космічний екліптіка алгоритм программа
Перелік ПОСИЛАННЯ
Немнюгин С.А. Turbo Pascal lt; # justify gt; # justify gt; Епанешников А.М., Епанешников В.А. Програмування в середовищі Turbo Pascal 7.0.- М .:
Діалог-МІФІ, 1995. - 288с.
Турбо Паскаль 7.0.- К .: Торгово-видавниче бюро BHV, 1996. - 448с.
Марченко А.П. Програмування в середовищі Borland Pascal 7.0.- К .: ВІК, К .: ЮНІОР, 1996. - 480с.
Фаронов В.В. Турбо Паскаль 7.0. Початковий курс. Учеб. посібник.- М .: Нолидж, 200. - 576с. # justify gt; Процедури і функції модуля System бібліотеки мови Turbo Pascal: Метод. рекомендації/Упоряд. О.А.Жульковскій.- Дніпродзержинськ: ДДТУ, 1995. - 24с.
Turbo Pascal. Робота з модулем CRT: Метод. рекомендації/Упоряд. О.А. Жульковскій.- Дніпродзержинськ: ДДТУ, 1996. - 12с.
Робота в середовищі програмування Borland Pascal 7.0: Метод. рекомендації/Упоряд. О.А. Жульковскій, І.А. Жульковскій.- Дніпродзержинськ: ДДТУ, 1996. - 22с.
Turbo Pascal. Процедури і функції модуля Graph: Метод. рекомендації/Упоряд. О.А. Жульковскій.- Дніпродзержинськ: ДДТУ, 1996. - 23с.
Turbo Pascal. ...