>
end;
sball: real
end;
Доступ до конкретного поля запису Дає Складення имя вигляд
<назва записами>. <назва поля>
Конкретні запису типу grupa оголошують у розділі var так: studentl, student2: grupa. У Програмі ЦІМ зміннім можна надаті, Наприклад, Такі значення:
studentl.surname: = 'Irop'; student2.birtday.month: = 5. br/>
Складені імена використовуват незручно. Смороду ведуть до громіздкіх віразів у Програмі. Щоб цього унікнуті, застосовують команду Приєднання with.
2. Команда Приєднання (with). Команда Приєднання Дає змогу використовуват у програми позбав імена полів. Загальний вигляд відряд with такий:
with <имя змінної типу запис> do <команда>;
У Цій команді после слова with Зазначаються имя змінної типу запис, а в команді пишуть позбав назви полів відповідного записах. До змінніх з попередня прикладові можна звернута так:
with studentl do
begin
name: = 'Шевченко'; surname: = 'Ігор';
with birthday do
year: = 1980; month: = 12; day: = 28;
end;
sball: = 4.9
end;
Задача. Вікорістовуючі тип даніх масив запісів, Скласти програму, за помощью Якої можна ввести у пам'ять комп'ютера дані про наявність на складі автомашин и отріматі інформацію про марки та рік випуску машин, ціна якіх Менш, чем $ 3000. Нехай запис містіть Такі поля: марка, рік випуску та ціна машини. Вивести на екран інформацію про ВСІ машини і додатково про ті, ціна якіх Менш, чем 3000.
program Avtoprice;
uses Crt;
const n = 10;
type avto = record
marka: string [15];
year, price: integer;
end;
var al: array [l .. n] of avto;
і: integer;
