- •Лабораторна робота № 1
- •1 Загальні відомості
- •1.1 Склад пакета Турбо Паскаль
- •1.2 Запуск інтеґрованого середовища Турбо Паскаль
- •1.3 Робоче середовище Турбо Паскаль
- •1.4 Призначення команд рядка «Меню»
- •1.4.1 Меню File
- •1.4.2 Меню Edit
- •1.4.4 Меню Run
- •1.4.5 Меню Compile
- •1.4.3 Меню Search
- •1.4.6 Меню Debug
- •1.4.7 Меню Tools
- •1.4.8 Меню Options
- •1.4.9 Меню Window і Help
- •2 Порядок виконання
- •3 Контрольні запитання
- •Лабораторна робота № 2
- •1 Загальні відомості
- •1.1 Порядок отримання *.Exe файла
- •1.2 Операторні дужки begin …end...
- •1.3 Оператори введення/виведення
- •2 Порядок виконання роботи
- •3 Контрольні запитання
- •Лабораторна робота № 3
- •1 Загальні відомості
- •Прості типи даних мови програмування Турбо Паскаль
- •1.2 Оператор присвоювання
- •Математичні функції й операції
- •Порядок виконання
- •Контрольні запитання
- •Лабораторна робота № 4
- •1 Загальні відомості
- •Структурні оператори. Складений оператор
- •Оператори розгалуження
- •1.2.1 Оператор if … then … else...
- •1.2.2 Оператор case … of … end...
- •Оператори циклу
- •1.3.1 Цикл із передумовою while … do …
- •Цикл із постумовою repeat … until …
- •Цикл із лічильником for … to … do …
- •Порядок виконання роботи
- •Контрольні запитання
- •Лабораторна робота № 5
- •1 Загальні відомості
- •Методи знаходження екстремумів функції
- •Методи розв’язування нелінійних рівнянь
- •Методи обчислення визначеного інтеґрала
- •1.4 Методи обчислення невласного інтеґрала
- •2 Порядок виконання роботи
- •3 Контрольні запитання
- •Лабораторна робота № 6
- •1 Загальні відомості
- •Символьний тип. Особливості застосування
- •Введення символів із клавіатури
- •Рядковий тип. Особливості застосування
- •Операції над рядками
- •2 Порядок виконання роботи
- •3 Контрольні запитання
- •Кодування символів відповідно до стандарту ansi
- •Лабораторна робота № 7
- •1 Загальні відомості
- •Структурні типи даних. Масиви
- •Опис масивів
- •1.2.1 Одновимірні масиви
- •1.2.2 Двовимірні масиви
- •2 Порядок виконання роботи
- •3 Контрольні запитання
- •Лабораторна робота № 8
- •1 Загальні відомості
- •Особливості використання модуля crt
- •Константи, типи і змінні
- •Порядок виконання роботи
- •Контрольні запитання
- •Лабораторна робота № 9
- •1 Загальні відомості
- •Особливості використання модуля Graph
- •Константи, типи і змінні
- •Порядок виконання роботи
- •Контрольні запитання
- •Лабораторна робота № 10
- •Загальні відомості
- •Особливості використання модуля Dos
- •Константи, типи і змінні
- •Порядок виконання роботи
- •Контрольні питання
- •Лабораторна робота № 11
- •1 Загальні відомості
- •Основні методи сортування
- •1.2 Оцінка алгоритмів сортування
- •1.3 Методи сортування
- •Порядок виконання роботи
- •Контрольні запитання
Контрольні запитання
Ініціалізація графічної системи.
Рисування найпростіших графічних примітивів.
Графічні режими.
Помилки ініціалізації графічної системи.
Особливості використання процедур: SetFillPatter, SetFillStyle, SetLineStyle.
Особливості використання процедур: SetTextJustify, SetTextstyle.
Особливості використання процедур: SetViewPot, SetVisualPage, SetActivePage.
Лабораторна робота № 10
Тема. Вивчення основних процедур і функцій модуля Dos
Мета: навчитися використовувати основні процедури і функції модуля Dos. Вивчити константи та змінні даного модуля
Загальні відомості
Особливості використання модуля Dos
Процедури і функції модуля DOS призначені для забезпечення інтерфейсу з програмами операційної системи. Після завантаження DOS більшість користувальницьких функцій реалізується через переривання з номером 21h, що називається перериванням DOS. Щоб виконати ту чи іншу дію, що запрограмована в операційній системі, необхідно звернутися до цього переривання, задавши номер необхідної функції в регістрі АН. Природно, що для такого програмного засобу, яким є компілятор Pascal, іґнорування стандартних можливостей DOS означало б утрату значної кількості користувачів. Тому, ідучи від стандартного Pascal, розроблювачі системи збагатили мову новими засобами, зібраними в окремому модулі DOS. Ім’я модуля вибране не випадково, а з метою підкреслити причинно-наслідкові зв’язки нових процедур і функцій. Крім доступу до будь-яких переривань і функцій операційної системи за допомогою процедур Intr і MsDos, користувач одержує доступ і до деяких найбільш важливих програм, реалізованих у модулі у вигляді окремих процедур і функцій.
Основні процедури і функції даного модуля подано в таблиці.
Опис |
Застосування |
DiskFree(диск: word): longint |
Повертає кількість вільних байтів на заданому диску |
DiskSize(диск: word): longint |
Повертає розмір заданого диска |
DosExitCode : word |
Повертає для підпроцесу код завершення |
EnvCount: integer |
Функція повертає кількість рядків, що містяться в операційному середовищі DOS |
EnvStr(індекс: integer): string |
Функція повертає заданий рядок операційного середовища |
Exec (маршрут, кому_рядок: string) |
Виконує зазначену програму, передаючи заданий рядок параметрів |
FindFirst (маршрут: string; атриб: byte; var пск_запис: SearchRec) |
Робить пошук у заданому (чи поточному) каталозі першого запису, що відповідає заданому імені файла і набору атрибутів файла |
FindNext(var пск_запис: SearchRec) |
Повертає наступний запис, що збігається з ім’ям і атрибутами файла, зазначеними при попередньому звертанні до процедури FindFirst |
Fsearch (маршрут; PathStr; список_кат: string): PathStr |
Виконує пошук файла в списку каталогів |
Fsplit (маршрут: PathStr; var каталог: DirStr; var ім’я: NameStr; var расшир: ExtStr} |
Розділяє ім’я файла на три компоненти |
GetCBreak (var прв: boolean) |
Повертає стан Ctrl+Break, що перевіряється операційною системою DOS |
GetDate (var рік, місяць, число, двнъ_тижня: word) |
Повертає поточну дату, встановлену в операційній системі |
GetEnv (перем_середовища: string) |
Повертає значення заданого змінного операційного середовища |
GetAttr(var ф_прм; var атриб: byte) |
Повертає атрибути файла |
GetFTime (var ф__прм; var час) |
Повертає дату і час останнього запису файла |
GetIntVec (ном_преривши: byte; вектор: pointer) |
Повертає адресу зазначеного вектора переривань |
GetTime(var година, хвилина, секунда, стільник_сек: word) |
Повертає встановлене в операційній системі поточний час |
GetVerify (var прапор_перевірки: boolean) |
Повертає стан прапора перевірки DOS |
Intr(номер__npep: byte; var регст: Registers) |
Виконує задане програмне переривання |
Keep (код_завершення: word) |
Перериває роботу програми і залишає її в резидентній пам’яті |
MsDos (var регст: Registers) |
Виконує функціональний виклик DOS |
PackTime (var тип_час: DateTime; var час: longint ) |
Перетворить запис DateTime (дата і час) у чотирьохбайтове значення, претворює в довгий цілий тип зображення дати і часу |
ParamCount: word |
Повертає число параметрів, переданих у командному рядку |
SetCBreak(првн: boolean) |
Установлює перевірку операційною системою DOS стан Ctrl+Break |
SetDate (var рік,місяць,число,день_тижня: word) |
Установлює поточну дату в операційній системі |
SetFAttr (var ф_пер; var атриб: byte) |
Повертає атрибути файла |
SetFTime (var ф_пер; час: longint) |
Установлює дату і час останнього запису файла |
SetIntVec (ном_прер: byte; вектор: pointer) |
Установлює по заданій адресі заданий вектор переривання |
SetVerify(прв: boolean) |
Установлює в DOS стан прапора перевірки |
SwapVectors |
Міняє місцями внутрішні вектори |
UnpackTime(час: longint; var дата, час: longint; var тип_час: DateTime) |
Перетворює у розпакований запис DateTime (дата і час) чотирибайтове значення, що є упакованим довгим цілим типом зображення дати і часу |