Программирование на языке Паскаль ЗАПИСИ в Паскале (RECORD)
Записи (Record) в Паскале Объединение разнородных элементов (Запись) Как мы уже выяснили, массивы объединяют однородные единицы информации – элементы одного и того же типа. Но многообразие информации нельзя свести только к какому-то одному типу данных. Например, - указывая положение точки в пространстве, мы можем воспользоваться одним и тем же типом для указания ее координат, Однако: - описывая человека, мы должны указать его имя, рост, цвет глаз и волос, то есть в одном описании объединим разнородную информацию. - описывая автомобиль, мы укажем не только его марку, но и год выпуска, модификацию, да и цвет кузова может нас заинтересовать.
Записи (Record) в Паскале Данные такого рода, описывающие существенные стороны того или иного объекта путем включения в описание нескольких, часто разнотипных, элементов, называют записью (record). В языке Паскаль запись определяется путем указания служебного слова record и перечисления входящих в запись элементов с указанием типов этих элементов. Запись Паскаля – структурированный комбинированный тип данных, состоящий из фиксированного числа компонент (полей) разного типа.
Записи (Record) в Паскале Например, анкетные данные о студенте вуза могут быть представлены в виде информационной структуры Такая структура называется двухуровневым деревом. В Паскале эта информация может храниться в одной переменной типа record (запись).
Записи (Record) в Паскале Задать тип record можно следующим образом: type =record : тип; : тип; …………………. : тип end ; где record – служебное слово, а и - правильные идентификаторы языка Паскаль.
Записи (Record) в Паскале Описание анкеты студента в Паскале будет выглядеть так: Type anketa=record fio: string[45]; pol: char; dat_r: string[8]; adres: string[50]; curs: 1..5; grupp: string[3]; end; Такая запись Паскаля, так же как и соответствующее ей дерево, называется двухуровневой.
Записи (Record) в Паскале Описание анкеты студента в Паскале будет выглядеть так: Type anketa=record fio: string[45]; pol: char; dat_r: string[8]; adres: string[50]; curs: 1..5; grupp: string[3]; end; Такая запись Паскаля, так же как и соответствующее ей дерево, называется двухуровневой.
Записи (Record) в Паскале Поля записи Паскаля могут иметь любой тип, в частности сами могут быть записями. Такая возможность используется в том случае, когда требуется представить многоуровневое дерево (более 2 уровней). Например, те же сведения о студентах можно отобразить трехуровневым деревом. Такая организация данных позволит, например, делать выборки по году рождения или по городу, где живут студенты.
Записи (Record) в Паскале В этом случае описание соответствующей записи в Паскале будет выглядеть так: Type anketa1=record fio: string [45]; pol: char; dat_r: record; god: integer; mes: string [10]; den: 1..31; end; adres: record gorod: string [25]; ulica: string [20]; dom, kv: integer; end; curs: 1..5; grupp: string [3]; end;
Записи (Record) в Паскале Поля После того, как определен тип записи Паскаля, можно определять переменную этого типа. Переменная определяется путем задания ее идентификатора и указания типа. var student: anketa; student 1: anketa 1; Теперь нам нужно узнать, как правильно получать доступ к элементам записи Паскаля. Элементы записи называются полями, а обращение к ним производится через использование их имен – идентификаторов полей. Но в отличие от обычной переменной имена полей должны предваряться ссылкой на идентификатор записи Паскаля и отделяться от него точкой. Такая запись называется уточняющий идентификатор:.
Записи (Record) в Паскале Поля Например, чтобы обратиться к полю curs переменной student, необходимо указать следующее составное имя: student.curs :=3; Для того чтобы обратиться к полю god в записи student 1, необходимо записать уточняющий идентификатор, состоящий из трех имен: student1.dat_r.god:=1982; Использование полей записи Паскаля в выражениях и условиях идентично использованию обычных переменных.
Записи (Record) в Паскале Операции над записями Паскаля. Единственная операция над записью (как над единым целым) которую можно произвести над однотипными записями Паскаля – это присваивание. Все другие операции производятся над отдельными полями записи.
Записи (Record) в Паскале Рассмотрим для начала простейший пример заполнения записи Паскаля и вывода ее на экран. Пусть нам необходимо заполнить сведения о студенте (Ф.И.О., дата рождения, адрес, курс и группа), а затем вывести эти сведения на экран. Пример программы c записью Паскаля: program primer1; type anketa=record fio: string[45]; dat_r: string[8]; adres: string[50]; curs: 1..5; grupp: string[3] end; var student: anketa;
Записи (Record) в Паскале begin {обратите внимание, ввод каждого поля осуществляется отдельно} writeln (введите сведения о студенте); writeln (введите фамилию, имя и отчество); readln (student.fio); writeln (введите дату рождения); readln (student.dat_r); writeln (введите адрес); readln (student.adres); writeln (введите курс); readln (student.curs); writeln (введите группу); readln (student.grupp); writeln (ввод закончен); writeln; {обратите внимание, что вывод записи осуществляется по полям} writeln (фамилия студента:, student. fio ); writeln ( дата рождения :, student.dat_r); writeln ( адрес :, student.adres); writeln ( курс :, student.curs); writeln ( группа :, student.grupp); end.
Записи (Record) в Паскале Оператор присоединения или как избавиться от префикса. Префикс – обязательная предшествующая часть составного идентификатора для имен полей в структуре типа запись Паскаля. Очень часто у программиста возникает желание не указывать префикс в имени полей, например, когда идет постоянное использование одних и тех же записей. В языке Паскаль предусмотрена такая возможность, реализуемая при помощи оператора присоединения, который в общем виде выглядит так: with do ; Следует обратить внимание на то, что после служебного слова do может стоять только один оператор, но он может быть составным (любая последовательность операторов, заключенная в операторные скобки begin end ).
Записи (Record) в Паскале Например, фрагмент программы с использованием оператора присоединения будет выглядеть так: Пример фрагмента программы c записью и префиксом Паскаля for I:=1 to 100 do with student[I] do begin writeln (введите сведения о, I, -м студенте); writeln (введите фамилию, имя и отчество); readln (fio); writeln (введите дату рождения); readln (dat_r); writeln (введите адрес); readln(adres); writeln (введите курс); readln(curs); writeln (введите группу); readln (grupp); end;
17 Спасибо за внимание