metod_15.03.04_atppp_oaip_ump_2016 (1016599), страница 27
Текст из файла (страница 27)
5 ] ;B := [ 3, 4, 5, 6 ] ;C := A + B ;{ С = [1 .. 5, 6 ] }C := A - B ;{ C = [ 1, 2 ] }C := A * B ;{ C = [3, 4, 5]}Над значениями множественного типа допустимы операции отношения ипринадлежности:I. Операции отношения:= - проверка эквивалентности множеств (два множества считаются эквивалентными,когда их элементы одинаковы, причем порядок следования элементов безразличен);<> - проверка неэквивалентности множеств;<= - проверка вхождения; >= - проверкавключения;Операции отношения на множествах выполняются быстрее, чем соответствующиеоперации на числах.II.
Операция принадлежности: A IN B. Операция IN определяет принадлежность(вхождение) А к В. Она используется для определения наличия конкретного значения Асреди возможных значений В, тип которого SET. Если А входит в В, то результатоперации – TRUE, иначе – FALSE.Дополнительно к этим операциям можно использовать две процедуры:1.
Include ( S, i) – включение элемента i во множество S$2. Exclude (S, i) – исключение элемента i из множества S.Элемент i должен иметь тот же тип, что и базовые элементы множества.Пример.VAR S : SETOF BYTE ;BEGIN{ Без процедур }S := S + 123 ;S := S - 45 ;{ С процедурами }INCLUDE ( S, 123 ) ;EXCLUDE (S, 45 ) ;Базовые свойства множеств:1. Все элементы, образующие множество должны быть различны;1192. Множество представляет собой неупорядоченную последовательность элементов,т.е.
порядок расположения элементов во множестве не фиксируется;3. Если задано множество [I..J] и если I > J, то заданное множество [I..J] пустое.ЗаписиВ задачах экономики и управления часто используются данные в виде таблиц,каждая строка которых может содержать разнотипные элементы. Такие данныепредставляются в виде совокупностей (структур) данных. На языке Паскаль ихназывают записями.
В составе записи (например, с данными одной строки таблицы)могут быть скалярные типы, массивы, записи того же или другого типа. Кроме того, наязыке Паскаль можно использовать массивы записей.Запись (record) – это структура данных, состоящая из фиксированного количествакомпонентов разного типа, называемых полями.
Поля могут быть различных типов. Сполями можно обращаться как с переменными соответствующего типа.Другими словами, запись – это структурированная конструкция, состоящая изпоименованных полей. Записи наиболее общий и гибкий тип данных Паскаля. Онимогут быть постоянной (фиксированной) или переменной (вариантной) структуры.Ввод-вывод и обработка записей в Паскале может производиться толькопоэлементно. Допускается копирование записей одного типа из одной переменной вдругую с помощью оператора присваивания.
Переменные типа «запись» могутучаствовать в операторах присваивания, но никакие операции над ними выполняться немогут. Арифметические или какие-либо другие операции могут выполняться только надотдельными полями записи.Фиксированные записи Фиксированная запись – это структура постоянногостроения, состоящая изфиксированного количества элементов (компонентов, полей).
Элементы записи в неймогут быть любых типов, в том числе скаляры, множества, файлы, другие записи.Описатель типа записи RECORD. Объявление записи завершается словом END иможет быть в подразделах TYPE и VAR. Форма объявления записи:TYPE T = RECORD {Т – идентификатор типа записи}Идентификатор поля 1 : Тип 1;Идентификатор поля 2 : Тип 2;…………..список полейИдентификатор поля К : Тип К;END ;гдесписок полей – это последовательность определений элементов записи;определение полей может быть в виде идентификатора или списка идентификаторовполей, разделенных запятыми; за идентификаторами ставится двоеточие и имя илиопределение типа.После объявления типа можно объявить переменную-запись.Например:TYPE TAB = RECORD{ объявление записи в подразделе тип }A, B : REAL { А и В – поля одинакового типа }END ;VAR C := TAB;120D : RECORD{ объявление записи в подразделе переменная }E, F : INTEGER:END ;Пример таблицы с данными различного типа:Номер зачетки9310093101……93500Фамилия и инициалыИванов И.И.Петров П.П.……..Казначеев А.А.Размер стипендии1200015000……25000Данные этой таблицы могут быть объявлены в виде:TYPESTR = RECORD{ STR - ИМЯ ТИПА ЗАПИСИ }NZ : 93100 ..
93500;FI0 : STRING [ 20 ] ;RS : REALEND ;VARSTUD : STR;{ STUD – переменная типа STR }MST : ARRAY [ 1..20 ] OF STR; { MST – массив данных типа STR }Чтобы использовать в операторе программы элемент (поле) переменной записи,необходимо указать имя переменной и, после точки, имя поля. Например, процедураWRITE (STUD . NZ, ‘ ‘, STUD . FI0, ‘ ‘, STUD . RS); выводит на экран содержимоеполей NZ, FI0, RS переменной-записи STR.В случае, когда необходимо обратиться к полю записи, являющейся подструктуройдругого поля записи (вложенность полей) уточнение имени поля обращенияосуществляется через еще одну точку. Например, A.B.C.Пример: сведения о результатах экзаменовФ.
И. О.ИвановИ.И.ПетровП.П.Номерзачетки93100Оценка экзамена по дисциплинеМатемат.ФизикаПрограммиров.545История5Запись931013333МассивзаписейДанные таблицы могут быть объявлены в виде:TYPE ST = RECORD{ОПРЕДЕЛЕНИЕ ТИПА ЗАПИСИ}FI0 : STRING [20];{ Ф.И.О. }NZ : 93100..93500; {номер зачетки }OZ : ARRAY [1..4 ] OF BYTE;{ поле – массив из четырех оценок}END;VAR EKZ : ARRAY [ 1 .. 25 ]OF ST;{ массив записей типа ST }Примеры обращения к элементам массива записей EKZ:121EKZ [ I ] . F10 – к фамилии I – ой строки таблицы;EKZ [ I ] . OZ [J ] – к J – ой оценке I – ой строки таблицы.Обращение к полям записи: X . DEN := 25 ; X .
MES := APR ; X . GOD := 1991; Y [ I ]. GOD := 1993 ;Пример копирования записи: X := Y [ I ] ;Для упрощения обращения к элементам записи, а именно для обеспечениявозможности обращения к элементам без составных имен, с помощью простых именэлементов записи существует оператор WITH (присоединить).Форма оператора WITH:WITH список имен – записей DO S ;где S – один оператор, простой или составной (блок). Слово WITH означает, чтопосле него до точки с запятой простого оператора или слова END составного операторапри обращении к полям переменных – записей из списка можно не указывать имязаписи, а только имя поля.Пример.Type Date = RecordDEN : 1 .. 31 ;{ поле интервального типа }MES : (YAN, FEB, MAR, APR, MAY, IUN,{ поле перечисляемого }IUL, AUG, SEN, OKT, NOV, DEC );{ типа }GOD : 1900 ..
2000;END ;VAR X : DATE ;{ переменная типа DATE }Y : ARRAY [ 1 .. 12 ] OF DATE ;{ массив типа DATE }Begin..........................................................................With Y[I] Do IfDen > 15 Then Write (‘ Вторая половина месяца’) ;Данная строка в программе означает, что из I – ой строки массива записей типаDate выбирается содержимое поля Den и сравнивается с числом 15.
Если оно больше15, то будет напечатано – «Вторая половина месяца».Вариантные записиВ списке полей записи могут быть фиксированные поля и одно переменное(вариантное) поле. Вариантная часть записи должна быть в конце описания, т.е. вкачестве последнего ее элемента. В описании записи перечисляются все возможныеварианты переменного поля записи.
При работе с записью в зависимости от значенияселектора записи (ключа) выбирается один из вариантов переменного поля записи.Переменная часть записи может быть представлена в одной из двух форм:Форма 1: TYPE SEL = тип ; { описание типа переменной селектора (ключа)}RECORD { описание фиксированной части записи}CASE SEL OFМетка 1 : (список полей);Метка 2 : (список полей);……………………END ;Форма 2: TYPE SEL = тип ; { описание типа переменной селектора (ключа)}RECORD { описание фиксированной части записи}122CASE PR : WORD OFМетка 1 : (список полей);Метка 2 : (список полей);……………………END ;SEL – имя типа ключа PR и меток для выбора варианта. PR – имя переменной –селектора (ключа) выбора варианта, оно должно получить значение до использованиявариантной части записи. Элемент списка полей – это список идентификаторов полей:тип; элементы списка полей, разделенных точкой с запятой.Ограничения:1) в описании записи может быть только одна вариантная часть;2) все идентификаторы в списках полей одной записи должны быть различны, но наразных уровнях вложенности полей одной записи и в разных записях имена могутповторяться;3) вариантная часть записи должна быть последним ее элементом.Тип SEL должен определять перечисляемый тип переменной.
Для выбора одного извариантных полей значениями этого типа должны быть метки, стоящие перед спискамивариантных полей. Переменной (PR) этого типа в программе можно присваиватьзначения ее типа (SEL) и таким образом выбирать один из вариантов полей вариантнойзаписи.Ключ выбора в предложении CASE..OF фактически игнорируется компилятором:единственное требование, предъявляемое к нему Турбо Паскалем, состоит в том, чтобыключ определял некоторый стандартный или порядковый тип.
Причем сам этот типникак не влияет ни на количество следующих далее вариантных полей, ни даже нахарактер констант выбора.Пример 1.TYPE VID = ( KNIG, GAZ, GUR ) ; { VID – перечисляемый тип, являющийсяименем и типом селектора }IZDANIE = RECORD{ тип вариантной записи }AVTOR, NAIM, : STRING ;CASE VID OFKNIG : (GODIZD : 1900 .. 2004; IZDAT : STRING) ;GAZ : ( NM : 1 .. 365 ; REDAKTOR : STRING ) ;GUR : ( NOM : 1 .. 12 ;GOD : 1900 .. 2004 ) ;END ;VAR V : VID ;{переменная типа VID }K : ARRAY ( 1 .. 50 ) OFIZDANIE ; { массив записей }BEGINWITH K [ 5 ] DO{ присоединение к пятой записи массива К }BEGIN{ заполнение пятой записи }AVTOR := ‘ А. Гусева’ ;NAIM := ‘Учимся информатике ‘ ;V := KNIG ;{ установлено значение варианта }GODIZD := 2001 ;IZDAT := ЗАО «ДИАЛОГ – МИФИ» ;123END ;END .Пример 2.TYPE VID = ( KNIG, GAZ, GUR ) ;{ VID – имя и тип селектора }IZDANIE = RECORD{ тип вариантной записи }AVTOR, NAIM, : STRING ;CASE V : VID OF { V – в составе записи IZDANIE }KNIG : (GODIZD : 1900 ..
2004; IZDAT : STRING) ;GAZ : ( NM : 1 .. 365 ; REDAKTOR : STRING ) ;GUR : ( NOM : 1 .. 12 ; GOD : 1900 .. 2004 ) ;END ;VAR E : IZDANIE ;{переменная типа IZDANIE }BEGIN{ заполнение переменной Е }E . AVTOR := ‘ А. Гусева’ ;E . NAIM := ‘Учимся информатике ‘ ;E . V := GUR ;{ установлено значение варианта }E . NOM := 10 ;{ установлено значение номера }E . GOD := 1988 ; { установлено значение года выпуска }END .Вывод. Громоздкость обозначений записей в программе с лихвой компенсируетсябольшей наглядностью алгоритма за счет структуризации данных, гибкостью иудобством при описании различных свойств сложного объекта.8.3.
![](https://s.studizba.com/z.php?f=/templates/si/i/noavatar.png&w=100&h=100&t=1"){kind=avatar}
