Пример программы

Программа Zap вводит информацию о пяти студентах: фамилию, год рождения, год поступления в техникум и оценки последней сессии. Результатом работы программы является список отличников. В программе показаны возможности организации работы с записями с использованием оператора присвоения.

Program Zap;

Uses crt;

Type Student = record

FIO: string[10];

GodRo: 1965..1975;

GodPostTex: 1985..1988;

Ocenki: record

Alg, Istor, Inform: 1..5;

end;

end;

Var Gruppa: array[1..5] of Student;

S1: Student; i, j: Integer;

Begin

clrscr; Readln;

With S1,Ocenki do

begin

for i:=1 to 5 do

begin

Write('=> ');

ReadLn(FIO); ReadLn(GodRo,GodPostTex,Alg,Istor,Inform);

Gruppa[i]:=S1;

end;

end;

Clrscr;

WriteLn('Список отличников:');

for i:=1 to 5 do

with Gruppa[i], Ocenki do

if (Alg=5) and (Istor=5) and (Inform=5) then

WriteLn(FIO, 'Год рождения: ', GodRo, 'Год поступления: ', GodPostTex:4);

end.

Вопросы к защите лабораторной работы № 2

1. Почему запись называют комбинированным типом данных?

2. Как осуществляется обращение к записи поля?

3. Какие требования предъявляются к идентификаторам поля в записи?

4. Чем определяется объём памяти, требуемый для размещения записи?

5. Какие действия можно производить с полями и записями в целом?

6. Что такое составное имя поля записи? Из каких частей оно состоит и как записывается?

7. Как применяется оператор With?

8. Что такое вложение записей? Какой максимально допустимый уровень вложения?

3 Домашняя работа № 1. Выполнение индивидуального задания по теме «Множества», «Комбинированный тип данных»

Цель работы. Обобщить знания студентов по темам «Множества», «Комбинированный тип данных». Научиться составлять программы с использованием множества и комбинированных типов данных.