Алгоритмические языки и программирование. Игошина Л.В. - 54 стр.

                      ...
                 Имя поля n:тип
                               END;
     Var Имя записи:Имя типа для записи;
     Второй способ описания более предпочтителен, будем использовать
     его.
     Например, пусть необходимо описать список студентов, имеющий
следующую структуру:

 №      Фамилия      Факультет Группа            Экзаменационные        оценки
 п/п    Имя                                 Физика Математика Программиров
        Отчество
      Описание представленной структуры будет иметь следующий вид:
      Type
            T_Stud=Record
                  Nom:word;
                  FIO:string[40];
                  Fac:string[5];
                  Group:string[6];
                  Ball:array[1..3] of byte;
                         End;
      Var Stud : T_Stud; {Описание одной записи}
      Записи могут быть составными частями массивов или других записей.
Так для описания всего списка студентов, состоящего, допустим, из 1000
записей необходимо записать:
      Spisok:Array[1..1000] of T_Stud; {Описание массива из записей}
      Элементы записи (поля) используются в программе как обычные
переменные данного типа. Чтобы обратиться к i - той записи представленного
списка (массива Spisok) и к его полю FIO необходимо записать: Spisok[i].FIO.
Для того, чтобы обратиться к той же записи и выбрать оценку по математике
необходимо записать Spisok[i].Ball[2].

     Для упрощения обращения к элементам записи используется оператор
присоединения
     WITH Имя записи DO
        Begin
         Операторы обращения к элементам записи
        End;
     Для нашего примера используем этот оператор при суммировании трех
оценок i-го студента:
            . . .
     Sum:=0;
     With Spisok[i] do