Работа с файлами в среде Turbo Pascal 7.0
учебно-методический материал по информатике и икт по теме

Государственное  образовательное  учреждение

дополнительного  образования   детей

          Санкт – Петербургский центр детского (юношеского)

                                   технического творчества

                            Методическое пособие

“Работа  с    файлами в среде

Turbo Pascal 7.0”

Автор :     Беляева Г.И.

2014 год

                     Работа с файлами  в среде  Turbo Pascal  7.

          Введение

       В системе Turbo Pascal  7.0  связь с внешними источниками , приемниками  и носителями

информации  осуществляется только с помощью файлов. Традиционно под  файлом  понима-

ется поименованная совокупность данных на внешнем носителе (как правило,это – диск лю-

бого типа), однако в Turbo Pascal  7.0 этот термин трактуется  более широко.

       Файлом  в ТР является любое внешнее устройство, являющееся приемником или источ-ником информации по своему назначению. Это может быть клавиатура, дисплей или принтер.

Такое устройство является  логическим, так как в данном случае учитывается их назначение,

а не  физические характеристики.

         Тема 1.  Файловый тип. Связь с внешним устройством.

                  В системе Turbo Pascal  7.0 имеется три вида файлов :

• текстовые;
• типизированные;
• нетипизированные;

                  Для обьявления  файловых переменных  необходимо в разделе  VAR  выполнить описание:

- Name_file  :  text                   --   для  текстового файла с именем              Name_file  ;

- Name_file  :  of  Name_type  –   для типизированного файла с именем    Name_file                                         

                                                                                   и    типом  его элементов                          Name_type ;

- Name_file  :  file                     -    для нетипизированного файла с именем Name_file ;

                  После обьявления файловых переменных  возможны операции над файлами. И самой пер-  

            вой из них является связь имени файловой переменной с конкретным файлом  на диске :

                       Assing (Name_file , ‘C:\Program\TP\Bib\Dan.txt’)

                   В процедуре Assing  используется имя файловой переменной, которое будет использовать-

             ся  в следующих операциях программы по обработке файлов,  и  полное имя этого файла на

             диске в кавычках (маршрут его).

          Вопросы по теме 1:

          1.  Какие типы файловых переменных обрабатываются средствами  Turbo Pascal  7.0 ?

          2.  Как обьявить  файловые переменные различных типов ?

          3.  Как указать на конкретный файл, подлежащий обработке  средствами  Turbo Pascal  7.0?

          4.  Чем отличается файловая переменная от конкретного файла на диске и для чего ее необхо-

     димо вводить в программу ?

            Задание по теме   1:   Описать текстовый файл, находящийся в подкаталоге KLASS  каталога

                                               SH  на  диске  D, с именем  puple.pas ,  как  файловую переменную ball .                                        

            Тема 2. Последовательность обработки файловых переменных.

                   После установки связи файловой переменной с конкретным файлом на диске можно при-

            ступить к ее обработке, используя ее имя  вместо громоздкого фактического имени на диске,

            в качестве параметра  в  процедурах  Turbo Pascal  7.0.

                   Последовательность обработки  следующая  :

• Открытие  файла   для   чтения   или   записи ;
• Обработка  файла   процедурам  и  функциями  Turbo Pascal  7.0 ;

                          -     Закрытие    файла;

                  При обращении к процедурам обработки файлов производится автоматическая

          проверка  на наличие ошибок Ввода - Вывода , и при их обнаружении программа преры-

          вается и на экран выводится сообщение об ошибке. Коды ошибок отлавливает  стандарт-

          ная  функция IoResult , которая возвращает значение, равное 0, если ошибок нет.

                    С помощью директив компилятора {$I+} и {$I-} автоматическую проверку ошибок

          Ввода – Вывода   можно включить или отключить. После отладки программы имеет смысл

          директива  - {$I-}.

            Вопросы по теме 2:

1. Какая последовательность обработки  файловых переменных в  Turbo Pascal  7.0 ?
2. Как осуществляется проверка ошибок Ввода – Вывода ?
3. Как можно программно отрегулировать контроль обнаружения ошибок Ввода – Вывода ?

           Тема 3.  Обработка текстовых файлов.

                 Текстовый файл открывается  процедурами :

                            -  Reset     (Name_file)   -  только для чтения ;

                            -  Rewrite (Name_file)   -  только для записи ;

                            -  Append (Name_file)   -  для добавления  новых записей ;    

                   Доступ к текстовому  файлу организуется последовательно, так как файл представляет

          собой  линейную последовательность строк и указатель при завершении ее считывания пере-

          мещается к следующей строке.

                    Для считывания информации из файла используютя процедуры  Read, ReadLn :

                            Read (Name_file, x1,x2..xn) – процедура выполняет чтение из файла с именем

                                                                              Name_file в переменные    x1, x2..xn;

          В текстовом файле можно сохранять не только текст, но и численные значения. В этом

          случае  как при считывании, так и при записи происходит автоматическое преобразование

          форматов числовых и символьных.

                      Для записи  информации  в файл используютя процедуры  Write, WriteLn :        

                           Write (Name_file,x1,x2..xn) – процедура выполняет запись  в  файл с именем

                                                                             Name_file из  переменных   x1, x2..xn;

                         Если  чтение производится с клавиатуры, то в процедурах  Read, ReadLn  опускает-

          ся параметр  Name_file  и подразумевается стандартная файловая переменная INPUT, а при

          выводе   файла на экран  подразумевается стандартная файловая переменная OUTPUT   вместо

          параметра  Name_file  в  процедурах Write, WriteLn.

                        Закрытие  текстового  файла осуществляется процедурой Close, которая  прерывает

           связь файловой переменной с ее фактическим файлом :

                          Close(Name_file)

            Вопросы по теме 3 :

1.  Какими процедурами  открываются  текстовые файлы  в  Turbo Pascal  7.0 ?

       2.   Какими процедурами  считываются   текстовые файлы  в  Turbo Pascal  7.0 ?

              3.   Какими процедурами  сохраняются   текстовые файлы  в  Turbo Pascal  7.0 ?

4. Возможна ли  процедура считывания или  записи в текстовом файле числовых

       данных.

5. Особенности  считывания данных с клавиатуры и вывода на экран.

Задание по теме   3:     Произвести  чтение текстового файла dan.txt  из корневого

                                         каталога  диска D и вывод его на :

                                        a) экран ;

                                        b) в  файл  wdan.txt корневого  каталога  диска D .

         Тема 4.  Обработка типизированных  файлов.

                     Как отмечалось выше, типизированный файл описывается в разделе VAR , следую-

          щим     образом   :

   Name_file  :  of  Name_type  –  типизированный файл с именем  Name_file                                         

                                                                      и    типом  его элементов  Name_type ;

                   При   обработке типизированных файлов могут быть использованы следующие

           процедуры  :

                  Assing                -   для связи файловой переменной с файлом на диске;

                  Reset, Rewrite   -  для открытия файла для чтения и соответственно для записи.

                                                  Reset -  можно использовать как для чтения, так и для записи;            

                  Read, Write      -   для  считывавния  и соответственно для сохранения  данных

                                                  из файла (в файл). Процедуры ReadLn, Writeln  для типизиро-

                                                  ванных файлов – недопустимы ;

                   Close                  -    для закрытия  файла.

                  Типизированные файлы целесообразно использовать для  хранения  однородной

            по типу  информации. Несмотря на то, что числовые данные можно хранить и в тесто-

            вых  файлах, лучше для этой  цели  использовать типизированные файлы, так как они

            используют меньше памяти.

   Вопросы по теме 4 :  

    1.   Как обьявить типизированный файл  ?

    2.   Какими процедурами можно открыть   и  закрыть  типизированный файл ?

3. Какими процедурами можно обработать  типизированный файл ?
4. Почему использование типизированного файла  предпочтительнее для хранения чисел

по сравнению с текстовым.

  Задание по теме   4:  1. Произвести считывание файла с целыми числами cifra.dat  из корневого

                                          каталога  диска D и вывод его на экран в формате (5 знаков).

                                      2. Произвести вывод чисел от 1 до 1000 в файл cifra1.dat   корневого

                                          каталога  диска D

  Тема 5.  Обработка  нетипизированных  файлов.

              Как отмечалось выше, нетипизированный файл описывается в разделе VAR , следую-

    щим     образом   :

   Name_file  :  file   –  нетипизированный файл с именем  Name_file                               

             При   обработке нетипизированных файлов могут быть использованы следующие

           процедуры  :

                  Assing                -   для связи файловой переменной с файлом на диске;

     Reset, Rewrite   -   для открытия файла для чтения и соответственно для записи.

           Процедуры     Reset, Rewrite   отличаются от соответствующих процедур для текстового

           и типизированного файлов наличием дополнительного, хотя и необязательного параметра,

           который  определяет размер порции  информации  при записи или чтении. Этот параметр                                                    

           имеет  тип  WORD. Если он отсутствует, то по умолчанию его величина = 128 байтам.

                Reset (Name_file, N)

                BlockRead  (Name_file, buf , count)   -  для  считывания  и соответственно для сохранения

                BlockWrite (Name_file, buf , count)   -  данных из файла (в файл)   в переменную buf  раз-

                                                                                    мером порции = count .                                              

                Close                  -    для закрытия  файла.

         Для эффективного выполнения операций  Ввода – Вывода  целесообразно использование

          нетипизированных  файлов, так как  с этим типом файлов возможен  прямой доступ

          к любому элементу  файла независимо от типа его  элементов.

       Вопросы по теме  5:

1. Какими процедурами открывается нетипизированный файл и в чем их отличие

от подобных процедур для других типов файлов ?

         2.    Какими  процедурами можно считывать или  сохранять нетипизированный файл

3. Какой метод доступа к элементам файла  возможен  при использовании нетипизиро-

ванных файлов ?

      Задание по теме   5:   Выполнить считывание нетипизированного файла в новый файл.

      Список использованной литературы

1. Сергиевский М.В.,Шалашов А.В. ТУРБО ПАСКАЛЬ 7.0 Язык. Среда программирования.

                                                                  Москва. Машиностроение. 1994 г.

2 .  Немнюгин С.А. TURBO PASCAL. Практикум.  ПИТЕР. Москва – Санкт-Петербург – и т.д.                

                                                                  2003 г.

П Р И Л О Ж Е Н И Е     1

         Процедуры  для обработки файлов в среде TURBO  PASCAL 7.0

Функции для обработки файлов в среде TURBO  PASCAL 7.0