Типізований файл (.Doc, dat, bit)

Тип інформації: Складається з однорідних елементів однакового типу. Кожний елемент має свій індекс.

Кінець файлу позначається маркером «кінець файла» eof.

Оголошення файлу: Var <ім'я файлової змінної>: file of <тип>;

Зв'язок файлової змінної з реальним файлом: ASSIGN (<ім'я файлової змінної >, ‘повне ім'я файла ‘);

Відкриття файлу на читання: RESET(<ім'я файлової змінної>);

Безпосередньо читання: Read(<ім'я файлової змінної>,

<ім'я допоміжної змінної>); Readln не використовувати !

Відкриття файлу на запис: ReWrite(<ім'я файлової змінної>);

Безпосередньо запис у файл: Write(<ім'я файлової змінної>,

<ім'я допоміжної змінної>); Writeln не використовувати !

Закриття файлу:

CLOSE(<ім'я файлової змінної>);

Нетипізований файл

Тип інформації: Може складатися з елементів різних типів

Оголошення файлу: Var <ім'я файлової змінної>: file;

Зв'язок файлової змінної з реальним файлом: ASSIGN (<ім'я файлової змінної >, ‘повне ім'я файла ‘);

Відкриття файлу на читання: RESET(<ім'я файлової змінної>, <розмір одиниці інформації >);

Безпосередньо читання:

BlockRead(<ім'я файлової змінної>, <ім'я допоміжної змінної>, <кількість одиниць інформації >);

Відкриття файлу на запис: REWRITE(<ім'я файлової змінної>, <розмір одиниці інформації >);

Безпосередньо запис у файл: BlockWrite (<ім'я файлової змінної>, <ім'я допоміжної змінної>, <кількість одиниць інформації >);

Закриття файлу:

CLOSE(<ім'я файлової змінної>);

Хід роботи.

Задача 1. Створити типізований файл f, компонентами якого являються цілі випадкові числа. Записати у файл g всі парні числа з файлу f, а у файл h — всі непарні. Порядок слідування чисел зберігається.

Задача 2. Створити типізовані файли f і g, компонентами яких являються випадкові цілі числа. Записати в файл h спочатку компоненти файлу f, а потім компоненти файлу g із збереженням порядку.

Задача 3. Створити у робочому каталозі типізований файл, який складається з цілих випадкових чисел. Вивести вміст файлу на екран. Знайти і надрукувати найбільший елемент файлу і номер його позиції.

Додаткове завдання:

Задача 4. В задачах 1, 2, 3 запис у типізований файл та виведення на екран оформити у вигляді процедур.

Контрольні питання до лабораторної роботи № 25:

1. Чим типізований файл відрізняється від текстового?

2. Яка організована інформація у нетипізованих файлах?

3. Яка послідовність використання у програмі типізованих та нетипізованих файлів?

4. Для чого призначена файлова змінна?

5. Які процедури призначені для виконання операцій з типізованими та нетипізованими файлами?

________________________________________________________________________________________________

Лабораторна робота № 26

Тема: Розв'язування задач з використанням файлових типів даних

Мета роботи. Закріпити навики складання програм, використовуючи стандартні функції та функції користувача.

Методичні вказівки до виконання лабораторної роботи

При розв’язуванні задач дотримуватись такої послідовності дій:

• Вивчити умову задачі

• Скласти математичну модель розв’язку задачі та блок-схему алгоритму

• Написати текст програм на мові Pascal.

• Виконати відладку та тестування програми

• Записати в зошиті текст програми та результати її виконання.

Задача 1. Створити у робочому каталозі текстовий файл. Переписати зі створеного файлу в другий текстовий файл тільки ті рядки, які починаються з букви А або а.

Вивести обидва файли на екран з відповідними поясненнями. Якщо потрібних рядків нема у першому файлі, вивести про це повідомлення.

Задача 2. Створити в робочому каталозі текстовий файл, рядки якого містять прізвища студентів. Вивести на екран:

• вміст всього файлу;

• тільки ті прізвища, що починаються на букву Т.

Якщо таких прізвищ нема, вивести про це повідомлення

Задача 3. Записати у файл послідовність цілих чисел, що вводяться з клавіатури. Прочитавши файл, знайти кількість парних чисел.

Задача 4. Створити файл, компонентами якого є цілі числа. Обчислити добуток перших двох від’ємних чисел.

________________________________________________________________________________________________

Лабораторна робота № 27

Тема: Складання програм з використанням перелічуваного та обмеженого типів даних

Мета роботи. Навчитися складати програми з використанням перелічуваного та обмеженого типів даних, застосовувати процедури введення/виведення до даних типу, що визначає користувач.

Хід роботи

Задача 1. Задано кілька типів: Type DAY=(MO, TU, WE, TH, FR, SA, SU); NOM = 10..25; SSS = ‘C’ .. ‘X’; WD = SA .. SU;

Визначити для цих типів їх базові типи.

Задача 2. Чи можна задати змінну перерахованого типу, що приймає дійсні значення на відрізку [ 2; 5] ?

Задача 3. Вказати помилки у наступних описах: Const A = 2 .. 30; B:=’B’; Pі = 3,14159;

Type ВІДРІЗОК =(1 .. 20); МІСТО = (Москва; Київ; Париж; Берлін); БУКВИ = (‘A’, ‘B’, ‘C’, ‘D’); ЦИФРИ = (0, 1, 2, 3, 4, 5, 6, 7, 8, 9);

Задача 4. Чи можна в розділі типів описати одночасно два наступних перерахованих типа?

TYPE ОЛІВЦІ = (Синій, Червоний, Зелений); КОЛЬОРИ = (Жовтий, Голубий, Синій); Задача 5. Є наступні описи: Type ФІГУРА = (Круг, Квадрат, Ромб); Var T, X : ФІГУРА; Z, Y: (Корзина, Сумка, Портфель);

Які з операторів присвоєння невірні та чому? a) X:=Круг; b) Z:= Квадрат; c) T:=X; d) Y:= ORD(Z)+1;

Задача 6. В розділі типів описано список деталей TYPE Список_Деталей =(Шуруп, Гайка, Гвинт, Шпилька); Написати фрагмент програми, який забезпечує роздруківку назви деталі за вказаним номером.

Задача 7. Знайти помилки у наступній програмі:

Program Pom; Type Mon =(Jan,Feb,Mar,Apr,Mai,Jun,Jul,Aug,Sep,Oct,Nov,Dec); Osin =(Sep .. Nov);

Var M: Osin; D: ‘0’ .. ‘9’; K: 0 .. 9; Begin

Read (M, D, K);

If M>Sep then D:=K else K:= ORD(M)-8;

Writeln(K, D+K);

End;

Задача 7. Є перелічуваний тип, що складається з констант:Red, Blue, Yellw. Написати програму, яка в залежності від введеного з клавіатури числа від 0 до 2 друкує значення константи з вказаного типу відповідним кольором. Організувати циклічне введення чисел. передбачити умови виходу з програми.