- •Завдання (інструкційна картка) для лабораторної роботи
- •Інструкційна картка лабораторного заняття № 1
- •Методичне забезпечення
- •Матеріально-технічне забезпечення
- •Питання для актуалізації опорних знань
- •Правила техніки безпеки
- •Загальні відомості з теми
- •Стандартні підпрограми для обробки файлів
- •Текстові файли
- •Контроль операцій введення-виведення
- •Файли без типу
- •Зміст роботи
- •Індивідуальні завдання
- •Приклади програм
- •Блок - схема програми:
- •Лістинг програми:
- •Результат роботи програми:
- •Лістинг програми:
- •Результат роботи програми:
- •Контрольні питання
Файли без типу
Система Turbo Pascal передбачає операції з файлами, які не мають типу. Ці файли сумісні з усіма типами файлів і призначені, як правило, для прямого доступу до файлу.
Опис безтипового файла складається з ключового слова File (наприклад: Var f:File; ). До файлів без типу можна застосовувати всі стандартні підпрограми, крім Read, Write і Flush. Вважають, що елементами файлів без типу є об’єкти довжиною 128 байтів. Під час використання процедури Seek вказівник файлу пересуватиметься по елементах такої довжини. Так, процедура Seek(f,2) помістить вказівник на третій елемент (байти з номерами 256..383). Операції зчитування і запису відбуваються лише порціями по 128 байтів. Це здійснюють процедури BlockRead і BlockWrite.
BlockRead(Var f:File; Var v:anytype; n:Integer; Var m:Integer) – процедура зчитує n блоків по 128 байтів з безтипового файла f. Результат вміщується в область оперативної пам’яті, яку займає змінна v (anytype – будь-який тип.). Необов’язковий параметр m показує, скільки блоків було фактично зчитано. Якщо m<n, то це означає, що в процесі зчитування файл закінчився.
BlockWrite(Var f:File; Var v:anytype; n:Integer; Var m:Integer) процедура записує n блоків по 128 байтів у безтиповий файл f. Дані, які записуються, беруться з області оперативної пам’яті, яку займає змінна v (anytype – будь-який тип). Необов’язковий параметр m показує скільки блоків було фактично записано. Якщо m<n то це означає, що з деякої причини не всі блоки були записані.
Зміст роботи
Вивчити теоретичний матеріал.
Виконати індивідуальне завдання.
Скласти звіт, в якому відповісти на теоретичні питання, описати алгоритм, описати програму, привести контрольний приклад виконання програми.
Індивідуальні завдання
Створити блок-схему та програму на мові Pascal для задачі згідно з індивідуальним завданням.
Створити файл, який містить інформацію про особисту колекцію книголюба. Структура запису: шифр книги, автор, рік видання, місцезнаходження (номер стелажу, шафи та т.і.). Кількість записів довільна.
Створити файл-довідник, який містить дані про біполярні транзистори. Структура запису: марка, провідність (n-p-n, p-n-p), максимальний струм колектора, максимальна напруга колектор-емітер, максимальна робоча частота. Кількість записів довільна.
Утворити файл, який містить інформацію про співробітників коледжу. Структура запису: прізвище працюючого, назва відділу, рік народження, стаж роботи, посада. Кількість записів довільна.
Утворити файл, який містить інформацію про пацієнтів дитячої клініки. Структура запису: прізвище пацієнта, стать, вік, місце проживання, діагноз. Кількість записів довільна.
Утворити файл, який містить інформацію про здачу студентами сесії. Структура запису: індекс групи, прізвище студента, оцінки з п`яти екзаменів та п`яти заліків (“З”–зараховано, “Н”– не зараховано). Кількість записів довільна.
Утворити файл, який містить інформацію про асортимент взуття в крамниці фірми. Структура запису: артикул, назва, кількість, ціна однієї пари. Кількість записів довільна. Артикул починається з літери Ж для жіночого взуття, Ч – чоловічого, Д – дитячого.
Створити файл-довідник, який містить дані про напівпровідникові діоди. Структура запису: марка, максимальний струм, максимальна зворотна напруга, падіння напруги у відкритому стані, максимальна робоча частота. Кількість записів довільна.
Створити файл, який містить інформацію про наявність квитків і рейсів Аерофлоту. Структура запису: номер рейсу, пункт призначення, час вильоту, час прибуття, кількість вільних місць у салоні. Кількість записів довільна.
Створити файл, який містить значення функції sin(x), cos(x), tg(x) коли x змінюється від 0 до 314 з кроком 0.5.
Написати програму яка створює файл, що містить інформацію про розклад телепрограм на день. Структура запису: назва програми, час початку програми, час закінчення програми.
Методичні РЕКОМЕНДАЦІЇ
Для виконання лабораторної роботи потрібно перш за все опрацювати теоретичний матеріал.
Виконати індивідуальне завдання.
Показати результат роботи викладачеві.
Скласти звіт, в якому відповісти на теоретичні питання, описати алгоритм, тобто створити блок-схему, описати програму (лістинг програми з коментарями), привести контрольний приклад виконання програми (результат роботи програми).
Здати робоче місце, а оформлений звіт – викладачеві на підпис.
Під час виконання лабораторної роботи дотримуватися правил безпеки.
