Студопедия.Орг Главная | Случайная страница | Контакты | Мы поможем в написании вашей работы!  
 

With StudentGroup [i] do



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; Прочитано: 203 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!



studopedia.org - Студопедия.Орг - 2014-2024 год. Студопедия не является автором материалов, которые размещены. Но предоставляет возможность бесплатного использования (0.009 с)...