Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | ||
|
Определение константы-записи имеет следующий вид:
(<идентификатор>: <тип> = <сп.знач.полей>), где:
<идентификатор> – идентификатор константы;
<тип> – тип записи;
<сп.знач.полей>) – список значений полей.
Список значений полей представляет собой список из последовательностей вида: имя поля, двоеточие и константа. Элементы списка отделяются друг от друга запятыми, например:
type
point= record
x,y:real
end;
vect = array [0.. 1]of point;
month = (Jan, Feb, Mar, Apr, May, Jun,
Hu, Aug, Sep, Oct, Nov, Dec);
date = record
d: 1.. 31;
m: month;
y: 1900.. 1999
end;
const
origon: point= (x: 0; y:-1);
line: vector=((x: -3.1;y: 1.5), (x: 5.9;y: 3.0));
SomeDay: date= (d: 16; m: Mar; y: 1989);
…
Поля должны указываться в той последовательности, в какой они перечислены в объявлении типа. Если в записи используется хотя бы одно поле файлового типа, такую запись нельзя объявлять типизированной константой. Для записи с вариативными полями указывается только один из возможных вариантов констант.
Например:
type
forma= record
caseBoolean of
true: (BirthPlace: string[40]);
false:(Country: string[20];
EntryPort: string[20];
EntryDate: array[1.. 3] of word;
count: word)
End;
const
Percon1: forma= (Country:’Россия’;
EntryPort:’Москва’;
EntryDate: (16, 3, 98);
Count: 12);
Percon2:forma= (BirthPlace:’Санкт-Петербург’);
Дата публикования: 2015-06-12; Прочитано: 200 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!