Работа с файлами

5:34 пп | Программирование Автор: prepod

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

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

Var
         F : file of integer;
  S1,S2 : file of string;

С каждой переменной файлового типа связано понятие текущего указателя файла. Текущий указатель можно понимать как скрытую переменную, которая в каждый момент времени указывает на какой-то один элемент файла.
Все элементы файла считаются пронумерованными и начальный элемент имеет нулевой номер.
Операции чтения из файла и записи в файл производятся поэлементно, причем в этих действиях участвует тот элемент файла, на который указывает в данный момент времени текущий указатель.

Установочные и завершающие операции:

Assign(F,’/home/class9a1/my_file.dat’); – устанавливает связь файловой переменной с конкретным файлом, существующим на диске.
Reset(F); – открывает уже существующий файл;
Rewrite(F); – создает файл. Если файл с таким именем уже существует, то файл очищается.

Операции чтения\записи:

Read (F,N); – считывает текущий элемент файла F в величину N
Write (F,N); – записывает значение величины N в текущий элемент файла F

Операции перемещения по файлу

Seek (F,P) – перемещает указатель на элемент №P в файле F;
FileSize(F) – возвращает количество элементов файла F;
FilePos(F) – возвращает номер текущей позиции в файле F.

Специальные операции

Erase(F) – удаление файла;
Renme (F) – переименование файла;
ChDir (F) – изменение текущего каталога;
MkDir (F) – создание нового каталога;
RmDir (F) – удаление каталог.

Пример программы. В каталоге ‘/home/class9a1/’ создать файл, содержащий названия месяцев.

Program N1_file;
Var
    F: file of string[15];
    n: string[15];
    I: byte;
Begin
    assign (F,'my_file.dat');
    rewrite (F);
    for I:=1 to 12 do
          begin
             writeln ('Введите название месяца № ',I);
             readln (n);
             write (F,n);
         end;
   close (F);
   writeln ('Ввод завершен');
  readln;
end.

Составить программу, которая открывает каталоге ‘/home/class9a1/’ файл, содержащий названия месяцев и выводит на монитор названия первых 5 месяцев.

Program N2_file;
Var
F: file of string[15];
n: string[15];
I: byte;
Begin
  assign (F,'my_file.dat');
  reset (F);
  for I:=1 to 5 do
     begin
        read (F,n);
        writeln ('Название месяца №',I,n);
     end;
  close (F);
  writeln ('Вывод на монитор названий месяцев завершен');
  readln;
end.
VN:F [1.9.22_1171]
Rating: 7.3/10 (11 votes cast)
VN:F [1.9.22_1171]
Rating: +1 (from 5 votes)
Работа с файлами, 7.3 out of 10 based on 11 ratings

Related posts:

  1. Составной оператор
  2. Подпрограммы-процедуры
  3. Как написать простую линейную программу на языке Pascal
  4. Массивы и матрицы
  5. Оператор ветвления в языке Pascal