Шпаргалка: Вопросы и ответы к экзаменам В-1

c.bp.month:=9;

Вариантныеполя

Type f= record

N: string;

Case byte of

0:(bp: string[30]);

1:(c: string[10],e: string[20],ed:1..31)

end;

Имена должны быть уникальны, хотя возможно повторение на различных уровнях

Вложенныеполя:

Type bd =record

D,m: byte;

X: word;

End;

Var c: record;

Name: string;

Db: bd;

Begin if c.db.year=1939 then………..

End.

В качестве ключа переменная:

Type rec2=record

C: LongInt;

Case x: byte of

1: (d: word);

2: (e:record

case boolean of

3: (f: real);

3: (g: single);

‘3’: (c: word);