Работа с составными типами данных в системе Turbo Pascal. Батхин А.Б - 15 стр.

UptoLike

Составители: 

Запись может входить в состав данных более сложной структуры. Можно говорить,
например, о массивах и файлах, состоящих из записей. Запись может быть полем дру-
гой записи.
5.3. Примеры определений
1) TYPE complex = RECORD
re,im : real
end;
VAR z1,z2 : complex;
2) TYPE student = RECORD
F1,F2,F3 : string[15]; day : 1..31;
month : 1..12;
year : integer;
zach : integer
end;
VAR GROUP : array [1..25] of student;
N : student;
VAR A : file of record
name : string[20]; data : record
day : 1..31; month : 1..12; year : integer
end;
zach : integer;
end;
При обозначении компоненты записи в программе следом за именем записи ста-
виться точка, а затем имя соответствующего поля. Так,
в примере 2 доступ к полю day
возможен по имени A.data.day, а к переменной - первой букве поля name - по имени
A.name[1].
Другие примеры:
1) z1.re:=2; z1.im:=3;
Комбинир.
тип
RECORD
Фиксиров. часть
Вариантн. часть
END
;
Фикси
р
ованная часть
Сек
ц
ия записи
;
Сек
ц
ия записи Имя поля
:
Тип
,
        Фиксированная часть                            Секция записи

                                                                ;


         Секция записи                         Имя поля                      :   Тип

                                                   ,

                                                        Фиксиров. часть

       Комбинир.            RECORD                             ;                       END
          тип

                                                        Вариантн. часть

     Запись может входить в состав данных более сложной структуры. Можно говорить,
например, о массивах и файлах, состоящих из записей. Запись может быть полем дру-
гой записи.


                                         5.3. Примеры определений
1) TYPE complex = RECORD
                                re,im : real
                       end;
     VAR z1,z2 : complex;
2) TYPE student = RECORD
                       F1,F2,F3 : string[15]; day : 1..31;
                       month : 1..12;
                       year : integer;
                       zach : integer
                   end;
     VAR GROUP : array [1..25] of student;
                       N : student;
     VAR               A : file of record
                                name : string[20]; data : record
                                day : 1..31; month : 1..12; year : integer
                       end;
                       zach : integer;
                       end;
     При обозначении компоненты записи в программе следом за именем записи ста-
виться точка, а затем имя соответствующего поля. Так, в примере 2 доступ к полю day
возможен по имени A.data.day, а к переменной - первой букве поля name - по имени
A.name[1].
     Другие примеры:
1)   z1.re:=2;                    z1.im:=3;