![]() |
Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | |
|
Begin
Write (‘Введіть прізвище ’, i:3, ‘ студента:’);
Read (FIO);
Write (‘Введіть номер його заліковки:’);
Read (Numb);
Write (‘Введіть його оцінку:’);
Read (Mark);
end;
Використання вкладених записів
Будь-яке поле запису може мати також складну структуру, тобто бути також записом. Наприклад, розглянемо структуру даних, в якій повинно зберігатися прізвище людини та її адреса (місто, вулиця, № будинк, № квартири). У табличній формі ці дані будуть виглядати так:
Прізвище | Адреса | ||
Місто | Вулиця | № будинку | Квартира |
Відповідно поля будуть мати такі типи:
Прізвище | Адреса | |||
Місто | Вулиця | № будинку | Квартира | |
string[20] | string [12] | string[20] | byte | word |
Поле “Адреса” складається з 4 частин і є також записом. Мовою Паскаль тип для запису такої структури описується так:
Type
ManType = record
FIO : string[20];
Address :record
Misto : string [12];
Vul : string[20];
Bud : byte;
Kv : word;
end;
end;
Для адреси також можна записати окремий тип, тоді загальний опис запису зміниться так:
Type
AddressType = record
Misto : string [12];
Vul : string[20];
Bud : byte;
Kv : word;
end;
ManType = record
FIO : string[20];
Address: AddressType;
end;
Опишемо змінну цього типу:
Var
Man: ManType;
Для доступу до полів поля адреси необхідно використовувати подвійну операцію розкриття запису:
Man. Adress. Misto:= ‘Київ’;
Man. Adress. Vul:= ‘Хрещатик’;
Man. Adress. Bud:= 1;
Man. Adress. Kv:= 26;
Якщо до оператора приєднання занести повторювану частину, о отримаємо:
Дата публикования: 2014-11-03; Прочитано: 217 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!