Завдання.

1. Для всіх варіантів необхідно задати графічне вікно, у якому розмістити текст завдання, з використанням шрифту, ф.І.П-б.

2. Задати інше вікно у якому, згідно варіантів виконати наступні малюнки :

1. Побудувати серію трикутників по даним вершинам i зміщених по вiсi ОХ.

2. Побудувати сімейство з 3-х паралелограмів, положення 3-х вершин першого з яких на екрані визначається парами чисел (30,150); (130, 150).

3. Побудувати сімейство рівносторонніх трикутників, розміщених на одній прямій, положення двох вершин першого з яких на екрані визначається парами чисел (30,150); (130,150).

4. Побудувати сімейство з 3-х квадратів зі стороною 20 крапок екрана, центр першого з яких співпадає з центром екрана, сторони квадрата повинні бути паралельними сторонам екрана.

5. Побудувати сітку для екрана. Довжина вікна сітки рівна 20 крапкам екрана.

6. Побудувати сімейство кіл з зміщеними центрами. Центр 1-го кола співпадає з центром екрана, радіус центра дорівнює 50 крапкам екрана:

а) зміщення по вiсi ОХ;

б) зміщення по вiсi ОУ;

в) зміщення по діагоналям.

7. Побудувати сімейство кіл, які зменшуються у радіусі з 10 точок екрана. Наступні кола з центрами у точках, зміщених

а) по вiсi ОХ на 20 точок;

б) по вiсi ОУ на 20 точок;

в) по діагоналях на 20 точок.

8. Побудувати зображення п'ятикутної зірки ламаною лінією. Довжина променя 40 точок екрана. Початкова позиція курсору в точці 100,80.

9. Побудувати зображення цифри 3, які слідують одна за одною по діагоналі вікна і зменшуються пропорційно одна одній.

10. Побудувати куб в ізометричній проекції на координатних висях.

11. Побудувати піраміду в ізометричній проекції на координатних висях.

12. Побудувати конус в ізометричній проекції на координатних висях.

13. Побудувати паралелограм в ізометричній проекції на координатних висях.

14. Побудувати сімейство рівновіддалених один від одного квадратів по діагоналі, які зменшуються пропорційно.

15. Побудувати сімейство рівновіддалених один від одного кіл по діагоналі, які зменшуються пропорційно.

16. Побудувати сімейство рівновіддалених один від одного трикутників по діагоналі, які зменшуються пропорційно.

17. Побудувати сімейство рівновіддалених один від одного шестигранників по діагоналі, які зменшуються пропорційно.

3. Зберегти малюнок у динамічній пам’яті за допомогою відомих процедур .

4. Розмістити малюнок у третьому графічному вікні на екрані (бажано з ефектом анімації).

Загальний вигляд вікна з графікою роздрукувати у звіт.

Частина 3.

Мета: навчитись керувати курсором у графічному вікні.

Завдання. За допомогою програмування клавіш управління курсором , або мишею створити програму, яка дозволить написати (як олівцем) Ваші прізвище, ім’я та по-батькові. Продемонструвати програму викладачеві. Пояснити виконання функцій.

Завдання до самостійної роботи.

1. Побудова складних зображень та малюнків. Виконання завдання

1. Обов'язково намалюйте зображення на міліметровому папері. Якщо можливо, розбийте зображення на незалежні частини, кожну з яких можна малювати окремо.

2. Виділіть на малюнку опорні точки: кінці вiдрiзкiв i дуг, центри кіл та еліпсів, обособленi точки. Домалюйте базові діагоналі прямокутників, по яким вони будуть будуватися.

3. Визначить максимальний розмір зображення, виходячи з розмірів екрана.

4. Визначить, відштовхуючись від i початкової точки, координати усіх опорних точок.

5. Визначить порядок будування ліній, дуг, окремих частин малюнка.

6. Намалювати (образ, малюнок) у потрібну область екрану.

7. Зберігати картинку на дискеті у вигляді файлу без типу.

У В А Г А !!!

Щоб запобігти неприємним випадкам під час роботи у графічному режимі, перед остаточним запуском програми на виконання потрібно:

1. Зберегти текст (або всі зміни, які вносились у текст програми у файл на диску);

2. Програму бажано відкомпілювати спочатку, а потім запустити на виконання.

3. Слід зауважити, що після одного запуску на виконання у ауд.303 з програмою працювати ви більше не зможете у поточному сеансі. Потрібно завантажити Інтегроване середовище і програму знову. Це особливість роботи Graph.Tpu на комп’ютерах CELERON.

4. Для того що б файл *.pas завантажувався натиском лівої кнопки миші (що дуже зручно при відлагоджуванні програм, які вміщують графіку), потрібно виконати наступні дії у середовищі Windows:

;

А) Помітити файл *. Pas, потім натиснути разом клавішу <SHIFT> і праву кнопку миші

Б) Вибрати у контекстному меню «Открыть с помощью..»;

В) У вікні, яке з’явиться на екрані вибрати потрібну програму для завантаження файлу – turbo, якщо у переліку программ її немає натиснути “Другая”;

Г) Вказати маршрут до *.EXE файлу : ..\Tp70\bin\turbo.exe и натиснути «Открыть».

Після цього программу модна буде завантажувати разом з іінтегрованим середовищем клацанням лівою кнопкою миші по імені файла *.pas.

Питання для самопідготовки:

1. Назвіть набір стандартних графічних модулів, які включені до середовища Turbo Pascal?

2. Дайте коротку характеристику модулю Graph ?

3. Як до власної програми здійснити підключення модуля Graph?

4. Яке призначення процедури InitGraph ?

5. Які щільності екранів Вам відомі ?

6. Яку функцію виконує процедура ClearDevice ?

7. Яке призначення процедури Close Graph ?

8. Яка процедура здійснює відображення крапки ?

10. Як побудувати лінію між двома точками ?

11. Яке призначення команди MoveTo ?

12. Що зображає процедура Rectangle(xl,yl,x2,y2)?

13. Що зображає процедура Circle(300,120,50)?

14. Що зображає процедура Sector(x,y,al, cc2,rx,ry)?

15. Що зображає процедура Arc(x,y,al,a2,r) ?

16. Що зображає процедура Ellipse(x,y, al, a2,rx,ry)?

17. Що зображає процедура Bar3d(xl,yl,x2,y2,N,topon)?

18. Що зображає процедура Bar3d(xl,yl,x2,y2,N,topoff)?

19. Яка команда несе відповідальність за надання того чи іншого кольору?

20. Скільки всього констант (кольорів) є в модулі Graph ?

21. Чи можна здійснити заливку замкнених фігур процедурами модуля Graph ?

22. В чому сутність процедури Randomize ?

23. Які є процедури виведення тексту в графічному режимі ?

24. Як працює процедура OutText('Turbo Pascal')?

25. Як працює процедура OutTextXY(100,100,'Turbo Pascal')?

26. Як відрізняються між собою процедури OutText('Turbo Pascal') і OutTextXY(100,100,'Turbo Pascal')⁹

25 Назвіть декілька відомих Вам графічних процедур, вказавши їх призначення

26. Створіть програм) побудови фігури трьохвимірного зображення - паралелепіпеда;

27. Як виконати ініціалізацію графічного режиму;

28. Як вивести передню грань кола радіусом 50?

30. Як відобразити текстову інформацію.

31. Як створити програму з використанням декількох графічних процедур? 32 Як змінити параметри при роботі з графічними процедурами?

33. Як намалювати квадрат в середині якого знаходиться коло?

34. Як намалювати герб України?

35. Як відобразити прапор України?

8