3.7.2. Зразок виконання індивідуального завдання
Завдання. Побудувати графік функції Y=SQRT(X) у діапазоні значень змінної Х є [a, b], для а=0; b=100.
1)Виконання завдання. Складемо алгоритм виконання завдання у вигляді графічної блок-схеми (рис.3.7.4).
Рис.3.7.4.Блок-схема побудови графіка функції
Програма, яка реалізує наведений алгоритм, має вигляд:
PROGRAM Graph_Func;
USES Crt, Graph; {під’єднання модуля Graph }
VAR a, b, h, x, y, :REAL;GrDr,GrM:INTEGER;
CUNST Xmax=100;Ymax=10;COLOR=4; {червоний колір}
FUNCTION F(XF:REAL):REAL; {обчислення функції}
BEGIN
F:=SQRT(XF);
END;
BEGIN
ClrScr;
WRITE (‘Введіть початок, кінець інтервалу; крок обчислень:’);
READLN (a, b, h);
GrDr:=DETECT; {режим автовизначення}
INITGraph (GrDr,GrM,’D:\TP7\BGI’); {перехід у графічний режим}
LINE(0,GETMAXY,GEYMAXX,GEYMAXY); {побудувати осі OX}
LINE(0,0,0,GETMAXY); { побудувати осі OY}
X:=a;
WHITE X <=b DO
BEGIN
Y:=F(X); {обчислення значення функції}
X1:=ROUND(X*GETMAXX/Xmax); {координата точки X1}
Y1:=ROUND((1-Y/Ymax)*GETMAXY); { координата точки Y1}
PUTPIXEL(X1,Y1,COLOR); {відображення точки (X1,Y1)}
X:=X+h;
END;
CLOSEGraph; {вихід із графічного режиму}
END.
При побудові осей OX і OY необхідно слідкувати, щоб одержана система координат була зв’язана з графіком функції. Зверніть також увагу на те, як розраховуються координати X1, Y1 точки. По-перше, оскільки ці координати – цілі числа, в правій частині оператора присвоювання застосована математична функція ROUND( ), яка округлює значення в дужках до найближчого цілого числа. По-друге, для одержання необхідного масштабу зображення введені масштабні множники Xmax, Ymax. Змінюючи їх значення, можна стискувати або розтягувати зображення відповідно по горизонталі і вертикалі, добиваючись потрібних розмірів.
2)Ввести, налагодити та виконати наведену програму за комп’ютером. Контрольні вправи та запитання
1.Наведіть та поясніть схему використання графічних засобів мови ТР 7.0.
2.Як виконується ініціалізація графічного режиму?
3.Які основні процедури для побудови зображення Ви знаєте?
4.Напишіть та виконайте за комп’ютером програми прямокутників, кіл та еліпсів.
Рекомендована література
Будь-яку дисципліну, в тому числі й інформатику, неможливо засвоїти, використовуючи лише конспект лекцій та методичну літературу. Тому для більш глибокого самостійного вивчення необхідно працювати з додатковою літературою: підручниками, посібниками, науково-популярними виданнями та ін. Рекомендується такий мінімальний список літератури:
Основы программирования и алгоритмические языки: Учебное пособие для техникумов/ В.Г.Баула и др.―М.:Энергоатом издат,1991.―400 с.
Зуев Е.А. Программирование на языке TURBO PASCAL 6.0,7.0.―М.:Радио и связь. Веста,1993.
Турбо Паскаль 7.0-К.:Торгово-издательское бюро BHV,1996.―148 c.
Лукин С.Н. Turbo Pascal 7.0. – М.:Диалог-МИФИ, 1999. – 384 с.
Грызлов В. И., Грызлова Т.П. Турбо Паскаль 7.0. – М.:ДМК, 1999. – 400 с.
Гусева А.И. Pascal 7.0. – М.:Диалог-МИФИ, 1999. – 256 с.
ЗМІСТ
Вступ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
3 |
|
4 |
1.1. Виклик інтегрованої інструментальної оболонки . . . . . . . . . . . . . . . |
4 |
1.2. Рядок меню . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
4 |
1.3. Створення та збереження програми на дискові . . . . . . . . . . . . . . . . . |
5 |
1.4. Виконання програми . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
5 |
1.5. Пошук помилок у програмі за допомогою налагоджувача. . . . . . . . |
6 |
1.6. Завершення роботи з ПО ТР 7.0. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
9 |
2. Мова TURBO PASCAL 7.0. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
9 |
2.1. Загальна структура програми в ТР 7.0. . . . . . . . . . . . . . . . . . . . . . . . . |
9 |
2.2. Типи даних мови ТР . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
11 |
2.3. Поняття алгоритму . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
12 |
3. Виконання лабораторних робіт . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
16 |
3.1. Лабораторна робота №1. Складання алгоритму та написання програми мовою ТР 7.0 для розрахунків функції з розгалуженням |
16 |
3.2. Лабораторна робота №2. Написання програм для роботи з простими типами даних мови ТР 7.0. . . . . . . . . . . . . . . . . . . .. . . . . . |
25 |
3.3. Лабораторна робота №3. Написання програм для введення та обробки серії із нулів й одиниць . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
29 |
3.4. Лабораторна робота №4. Написання програм введення та обробки двомірних масивів . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
34 |
3.5. Лабораторна робота №5. Написання програм із використанням процедур і функцій . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
39 |
3.6. Лабораторна робота №6. Написання програм із використанням складених типів даних: STRING (рядковий), RECORD (запис), FILE (файловий) . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
48 |
3.7. Лабораторна робота №7. Написання програми з використанням графічних засобів мови ТР 7.0. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
58 |
Рекомендована література.. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . |
62 |