Тип данных String в Pascal.

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

Процедуры STR и VAL.

В строковую переменную можно записывать не только буквы, но и цифры. Однако это будут не числа, как таковые, а их символьное представление. Для преобразования символьных представлений числа в само число, и наоборот, используются процедуры STR и VAl.

...

Логические и символьные константы.

В данном уроке будет рассмотрено применение логических и символных констант. Логическая константа может принимать только 2 значения, либо True, либо False. В качестве значения символьной константы могут использоваться любые символы, которые есть в ...

Циклы и массивы

Оператор варианта CASE.

Иногда его называют также оператором выбора. Это оператор CASE, который является обобщением оператора IF и позволяет сделать выбор из произвольного числа имеющихся вариантов.

Тип данных Integer.

Тип INTEGER (целый). Этот тип представляет множество целых чисел диапазона от -32768 до 32767. В памяти ЭВМ  под целое число отводится два байта (16 бит).

Типизированный файл – это файл, в котором содержатся однотипные данные. Типизированный файл задается с помощью 2-х ключевых слов «file of». После слова «of» указывается тип файла, например integer, real, char, string и т.д. Тип файла может быть любым за исключением файлового типа (не может быть файла файлов) и комбинированного типа, один из компонентов которого имеет файловый тип.

В отличие от текстовых файлов, в типизированном файле информация хранится в двоичном представлении (в текстовом файле информация хранится в виде цепочки символов). Данный факт позволяет производить чтение и запись в файл более быстрым способом, т.к. отсутствует необходимость в преобразовании данных. Кроме того, в типизированном файле возможен прямой доступ к записям файла (в текстовом файле возможен только последовательный доступ).

Напишем программу, которая создаст своеобразную базу данных, хранящей сведения о студентах: их именах, номерах курса и групп.

Типизированные файлы в Паскаль.



Program file11;
uses crt;
Type Student = record
      fio: string [20];
      kurs, group: integer;
end;
var zap : student;
     f: file of student;
     name: string;
begin
clrscr;
Writeln ('Задайте имя файла');
Readln (name);
Assign (f, name);
Rewrite (f);
Writeln ('Введите фамилию и инициалы студента');
Readln (zap.fio);
While zap.fio <> ' ' do
Begin
Writeln ('Введите номер курса и группы');
Readln (zap.kurs, zap.group);
Write (f, zap);
Writeln ('Введите фамилию и инициалы следующего студента ');
Readln (zap.fio);
End;
Close(f);
Writeln ('Файл создан');
readln
End.


Строка №3-№6. Объявляем в программе тип Record и указываем для него компоненты. Первый компонент «fio» (строка №4) будет описывать фамилию и инициалы студента. Компоненты «kurs» и «group» будут описывать соответственно номер курса и номер группы.

Строка №7. Объявляем переменную «zap» и указываем для нее тип «Student». Теперь с помощью переменной «zap» мы можем обратиться к любому компоненту записи.

Строка №8. Создаем файловую переменную «f» и указываем для нее тип «Student». Таким образом, мы создаем файл записей, где будет храниться информация о студентах.

В строке №9 создаем переменную «name», которая понадобится нам для создания имени файла.

Строка №13. Вводим с клавиатуры имя файла. Это имя будет записано в переменную «name».

Строка №14. Связываем файловую переменную «f» с именем файла. Как и в случае с текстовыми файлами связывание файловой переменной с файлом производится с помощью процедуры Assign

Строка №15. Открываем файл для записи. Открытие типизированного файла для записи производится аналогично текстовым файлам с помощью процедуры Rewrite. Так как самого файла не существует, он будет создан автоматически и будет иметь имя, которое мы задали в строке №13.

Строка №17. После вывода на экран сообщения (строка №16) мы вводим значение для 1-ого компонента записи (фамилию и инициалы студента).

Строка №18. Записываем цикл. До тех пор пока не будет введено пустое значение для компонента «zap.fio» необходимо выполнять действия, записанные в строках №20 - №24. Знак <> означает неравно. После этого знака в апострофах записывается значение, которому не должен быть равен компонент «zap.fio». Внутри апострофов мы ставим знак пробела. Таким образом, цикл будет выполняться до тех пор, пока вместо фамилии очередного студента не будет нажата клавиша «пробел».

В цикле будут выполняться поочередно 4 действия:

  • Строка №20. Выводим на экран сообщение.
  • Строка №21. Вводим с клавиатуры через пробел номер курса и номер группы.
  • Строка №22. В файловую переменную «f» заносим содержимое записи «zap».
  • Строка №23. Выводим на экран сообщение.
  • Строка №24. Вводим с клавиатуры фамилию и имя студента.

Эти строки будут повторяться в цикле, пока на предложение ввести фамилию и инициалы студента мы просто нажмем пробел. После этого файл будет закрыт (строка №26) и на экран будет выведено сообщение (строка №27).

tipizirovannihe fayjlih

tipizirovannihe fayjlih.

После запуска программы нам необходимо ввести имя файла. Я ввел имя «programs\students.dat». Автоматически в директории «C:\FPC\2.2.2\bin\i386-win32\Programs» создается файл с таким именем.
После этого необходимо ввести фамилии студентов и номера курсов и групп. Я ввел данные для двух студентов Путина и Медведева. На очередное сообщение ввести фамилию студента я нажал пробел.


Дополнение к материалу.

Следует отметить, что типизированные файлы нельзя создать в текстовом редакторе, как мы делали это для текстовых файлов. Если мы откроем файл «students.dat» в директории «C:\FPC\2.2.2\bin\i386-win32\Programs» с помощью блокнота, то увидим непонятные символы.


Предыдущая статья : Использование типа Record в текстовых файлах.
Оглавление : Уроки Паскаль. Файлы.
Следующая статья : Уроки Паскаль. Файлы.


Комментарии  

 
+11 # Арменчик 05.05.2012 19:05
нормально написано, но мало)
Ответить
 
 
+7 # Мартин 03.09.2012 13:02
Спасибо! Только благодаря вашей статье и
разобрался:)
Ответить
 
 
+3 # Серёжа 11.12.2012 17:14
Послушай, а почему когда в строке 21 ввёл с клавиатуры, а потом в строке 22 записал в файл, Но когда ввёл в (24) фамилию, почему не надо записать фамилию в файл?
Ответить
 
 
+4 # Андрей 15.12.2012 18:35
норм) а в каком расширении файлы лучше открывать,
потому что в .txt цыфры не выводит?
Ответить
 
 
+1 # витя 02.03.2013 09:34
Очень хорошо написано, спс, очень помог :D
Ответить
 
 
+1 # кеша 10.06.2014 16:46
:-) норм только мало вот
Ответить
 
 
+3 # Кот в сапогах 25.03.2015 16:01
@Серёжа, во-первых, на строке 22 ты не просто имя записываешь, а имя+курс+группу т.к. ты звписывешь целый zap в файл. Во-вторых, фамилия введенная на строке 24 будет записана на той же строке 22 строку когда ты следующий раз проидешься по циклу.
Ответить
 
 
+2 # Кот в сапогах 25.03.2015 16:07
А так да, мало по типизированным файлам-то, надо как минимум программу чтобы обратно прочитывала из этого файла. Хорошим упражнением по типизированным файлам будет написание программы телефонной книги, где ты можешь подавить имя+телефон, вывести все имя+телефон из файла на экран, сделать поиск номера телефона по имени и удаление контакта.
Ответить
 
 
+3 # Кот в сапогах 25.03.2015 16:08
где ты можешь добавить имя+телефон*
Ответить
 
 
0 # куулар 07.11.2016 02:49
:sad: :-| :P :sigh:
Ответить
 
 
0 # шы 16.12.2016 07:25
куда инвестировать свой многочилсенный капитал увожаемые товарищи
Ответить
 

Добавить комментарий

Защитный код
Обновить

   ГлавнаяПаскальФайлы в Паскаль