Лабораторна робота №8 Файли Текстові файли

Текстові файли описуються словом Text.

Наприклад:

Var f:text;

Текстовий файл складається з символів, які складають рядки. В загальному випадку це рядки різної довжини. Закінчується рядок ознакою кінець рядку. Ця ознака вводиться при натисканні клавіші Enter. Файл закінчується ознакою кінець файлу. Кінець файлу розпізнає функція Eof. Кінець рядку розпізнає функція EoLn. Файлова змінна зв'язується з файлом на диску оператором Assign. Для вводу інформації в текстовий файл використовуєтьс процедура Rewrite, для читання Reset, для доповнення файлу використовується процедура Append . Для запису даних в файл використовується процедура WriteLn абоWrite а для читання ReadLn або Read. Після того, як робота з файлом закінчена його закривають оператором Close. Вводити початкові значення можна також з текстового редактору. Але при такому вводі початкових даних треба слідкувати щоб всі числові дані були відділені одне від одного пропуском. Enter є ознакою закінчення числового рядку. Якщо інформація до текстового файлу вводилась як один рядок, але в ньому є дані різних типів то отримати окремі складові можна за допомогою текстової функції Copy. І, взагалі, така інформація обробляється з використанням функцій обробки рядків.

Наприклад:

Var f:text;

namber,s:real;

Begin

Assign(f,’text.dat’);

s:=0; reset(f);

While not eof(f) do

Begin

Read(f,number); s:=s+number;

End;

WriteLn(‘s=’,s); End;

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

Eoln(f)-функція приймає значення True, якщо покажчик вказує на кінець рядка.

Seekeofl(f)- аналогічно EoLn.

Seekeof(f)- аналогічно Eof.

Append(f)-додавання записів у файл, виконується відкриття файлу F і встановлення покажчика на EOF.

Readln(f)-порядкове читання текстового файлу.

Writeln(f)-порядковий запис у текстовий файл.

1. Створити текстовий файл, кожний рядок якого містить різні слова. Знайти найдовші слова в кожному рядку файлу, переписати їх в новий текстовий файл, записати останнім рядком файлу кількість слів у файлі.

2. Створити текстовий файл, рядок якого містить цифри і символи. У кожному рядку виділити найбільшу послідовність цифр. Довжини цих послідовностей записати у вихідний цифровий файл.

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

4. Ввести з клавіатури рядки. Створити файл, визначити кількість рядків файлу, у кожному рядку знайти найдовше слово та дописати його в кінець кожного рядка.

5. Ввести текст, в кожному рядку знайти слово, яке знаходиться посередині, переписати це слово в вихідний файл.

6. Заданий текстовий файл та текстовий підрядок. Отримати текстовий файл, який містить тільки ті рядки, в які входить заданий підрядок.

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

8. Заданий текстовий файл, що містить прізвища, прохідний бал, спеціалізацію. Відсортувати цей файл за набраним балом. Переписати в вихідний файл ті текстові записи у яких набраний необхідний прохідний бал.

9. Заданий текстовий файл. Переписати в вихідний файл ті рядки, які закінчуються символом пропуск, тире, кома та крапка.

10. Заданий текстовий файл. Переписати в вихідний файл рядки, замінивши вних символи 0 на 1 та навпаки.

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

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

13. Створити текстовий файл, який містить марки принтерів та їх ціни. Переписати в вихідний файл ті рядки, що мають ціну не вищу за вказану.

14. Створити текстовий файл, який містить слова. Знайти в кожному рядку слово, яке починається та закінчується на дві задані букви. Переписати ці слова в вихідний файл.

15. Створити текстовий файл, який містить, цілі числа. Переписати ці числа в вихідний файл в двійковому коді.