Реферат: Записи в языке Turbo Pascal
mark: = 'volvo';
date: = 1996;
typ: = 'car';
remont: = false;
end;
В рамках составного оператора, следующего за with, каждое обращение к имени поля автоматически связывается с записью mashine. Оператор with позволяет более компактно представлять часто используемые переменные.
Так как на тип компонентов массива не накладывается ограничений, то можно образовать массив, компонентами которого являются записи.
Приведем описание такого массива:
var mashine: array [1. .100] of auto;
Принимая во внимание предыдущее описание auto, можно сделать вывод, что описана таблица, в которой могут содержаться данные на 100 автомобилей.
Марка | Дата выпуска | Тип кузова | Ремонт |
VOLVO | 1996 | CAR | Не был |
ВАЗ | 1986 | СAR | Был |
... ... | ... ... | ... ... | ... ... |
... ... | ... ... | ... ... | ... ... |
ЗИЛ | 1990 | LORRY | Не был |
Теперь можно записать следующие операторы: для обращения к первому элементу массива:
mashine [1]. mark: = 'ваз';
для чтения первого элемента:
read (mashine [1]. mark);
Как и в массиве, значения переменных и констант типа record можно присваивать другим переменным такого же типа:
mashine [1] : =mashine [2];
Поле записи само может быть записью. В примере записи auto введем дату приобретения автомобиля.
type
auto = record
mark, typ: string [10];
date1: record
den: integer;
mes: string [10];
god: integer;
end;
date: integer;
remont: boolean
end;
var mashine: auto;