Microsoft Word Лаб практ инф

 
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); 

---

93
Задание:
Из множества целых чисел от 1 до 100 выделить множество 
чисел, делящихся без остатка на 2 или 3. 
Набрать и отладить программу.