Информатика. Шевелев Г.Е. - 92 стр.

UptoLike

Составители: 

92
3. Введите в программу изменения, чтобы вместо составного имени
использовалось просто имя поля. Для этого в соответствующих местах
программы ( при вводе и выводе) надо использовать оператор With. Например,
при вводе:
For i:=1 To n Do
Begin
With Student[i] Do
Begin <Ввод данных> End
End;
4. Проведите расчеты по откорректированной программе, убедитесь, что
результаты работы программы не изменились, а обращаться к полям записи
стало проще.
II. Использование множеств
Множества представляют собой ограниченный набор однотипных
логически связанных друг с другом объектов. Количество элементов, входящих
в множество, может меняться от 0 до 256 (возможно пустое множество).
Именно непостоянством количества элементов множества отличаются от
массивов и записей.
Формат объявления типа «Множество»:
<Имя типа>=Set of <Базовый тип элементов множества>.
Над множеством определены операции:
1. Пересечение (C=A*B) множество C, содержащее элементы, общие для
множеств A и B;
2. Объединение (C=A+B) множество C, содержащее элементы множества
A, дополненные недостающими элементами из множества B;
3. Разность (C=A-B) множество C, в котором отсутствуют элементы,
входящее в множество B;
4. IN проверка принадлежности задаваемых элементов k множеству A
(k IN A).
Ввод множества X с клавиатуры осуществляется следующим образом:
X:=[] ; {Задание пустого множества}
For i:=1 To N Do
Begin Readln(a); X:=X+[a] End;
Вывод элементов множества X на экран:
For i:=1 To N Do
If i IN X Then Write(i:4);