Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Паскаль.doc
Скачиваний:
0
Добавлен:
01.03.2025
Размер:
825.34 Кб
Скачать

Приклади графічних побудов

Нарисувати різними кольорами десять концентричних кіл, які мають спільний центр у центрі екрана, тобто в точці з графічними координатами (320; 240), і описати навколо кіл червоний прямокутник.

program CC;

uses crt, graph;

var driver, mode, r : integer;

begin

driver := detect;

initgraph(driver, mode, ");

r := 10; {радіус першого кола 10 пікселів}

while r <= 100 do begin

setcolor(r div 10); circle(320, 240, r); r := r + 10 end;

setcolor(red);

rectangle(220, 140, 420,340)

end.

Поняття про анімацію

Чергування засвічувань і гасінь зображення використовують для імітації руху цього зображення на екрані. Перед наступним засвічуванням об'єкт треба змістити у напрямку переміщення. Рух зображення на екрані називається анімацією.

Для імітації руху об'єкта на екрані потрібно виконати такий циклічний алгоритм.

  1. Нарисувати об'єкт у потрібній точці й зробити паузу.

  2. Знищити об'єкт, замалювавши його кольором тла.

  3. Змінити координати об'єкта.

  4. Перейти до пункту 1.

Завдання для самостійної роботи з теми "Комп’ютерна графіка".

  1. Покажіть схематично розташування на текстовому екрані точок з такими координатами: а) 10,10; б) 1,20; в) 20,1; г) 60,20; д) 20,60.

  2. У текстовому режимі виведіть на екран своє прізвище, ім'я та по батькові трьома різними кольорами з ефектом миготіння.

  3. Зобразіть у текстовому режимі 15 різнокольорових точок (чи інших символів): а) у горизонтальному рядку; б) у вертикальному рядку; в) удіагональному напрямку; д) посередині екрана.

  4. Покажіть на схемі графічного екрана розташування точок з такимикоординатами: а) 50,10; б) 40,120; в) 130,160; г) 500,200; д) 100,400.

  1. Запишіть процедуру рисування: а) прямокутника з координатами діагонально-протилежних вершин (10,10) і (100,100); б) кола радіуса 50 пікселів і з центорм у точці (100,100); в) прямої горизонтальної лінії довжиною 100 пікселів у центрі екрана; г) вертикальної лінії довжиною 60 пікселів у лівій половині екрана; д) сектора круга з центром посередині екрана і кутом /2 радіани.

  2. Нарисуйте на екрані: а) вікно; б) двері; в) ромашку; г) олімпійські кільця; д) повітряну кулю; е) сходи; є) дирижабль (еліпс).

  3. Нарисуйте на екрані прапор (прямокутне полотнище і древко):а)України; б) Росії ;с) країни на свій вибір.

  4. Нарисуйте 10 кіл з радіусом 50 пікселів, центр яких зміщується відточки (100,100) з кроком 15 пікселів у деякому напрямку. Модифікуйте програму, щоб радіус кіл зменшувався або збільшувався на 5 пікселів.

  1. Нарисуйте в зошиті емблему, зазначивши всі координати на рисунку і складіть відповідну програму: у верхній правій чверті графічного екрана розташуйте коло, в ньому — прямокутник, по середині якого виведіть своє прізвище. Замкнені ділянки замалюйте різними кольорами.

  1. Нарисуйте в зошиті емблему, зазначивши всі координати на рисунку, і складіть відповідну програму: у нижній лівій чверті графічного екрана розташуйте квадрат, у ньому — коло, по середині якого виведіть своє ім'я. Замкнені ділянки замалюйте різними кольорами.

  2. Нарисуйте емблему на свій вибір, зазначивши всі координати на рисунку, і складіть відповідну програму.

  3. Складіть алгоритм для імітації руху кола на екрані у деякому напрямку.

  4. Складіть алгоритм для імітації руху на екрані: а) прямокутника;б)деякого слова; в) числа; г) літери; д) фігури на свій розсуд.

Задачі підвищеної складності для графічних побудов

  1. Побудуйте графіки функції y=asin(bx) для різних значень а та б.

  2. Побудуйте графіки функції y=acos(bx) для різних значень а та б.

  3. Модифікуйте стовпчикову діаграму, щоб відобразити діяльність деякоїавтомобільної фірми у трьох кварталах з такими показниками 120, 180, 240.

  4. Нарисуйте кругову діаграму для задачі про діяльність фірми.

  5. Використайте рекурсію для рисування десяти концентричних кіл і функцію random(15) для випадкового генерування значень кольору наступного кільця.

  6. Побудуйте заставку для екрана монітора.