Предыдущая страница реферата | 6  7  8  9  10  11  12  13  14  15  16 | Следующая страница реферата

With c.bp do month:=9;

With c do with bp do month:=9;

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

Рекомендуем скачать другие рефераты по теме: дипломная работа проект, защита диплома.



Предыдущая страница реферата | 6  7  8  9  10  11  12  13  14  15  16 | Следующая страница реферата

Поделитесь этой записью или добавьте в закладки