Перечислить через запятую в возрастающем порядке элементы, которые входят в множество А после выполнения следующей последовательности операторов: var A,B,C:set of 1..100; I:byte; begin A:=[1..10,20,30,40]; for ...
Перечислить через запятую в возрастающем порядке элементы, которые входят в множество А после выполнения следующей последовательности операторов:
var A,B,C:set of 1..100;
I:byte;
begin
A:=[1..10,20,30,40];
for I:=1 to 9 do A:=A-[i];
B:=[20..30];
A:=B*A;
end.
Помогите пожалуйста!!
Гость
Ответ(ы) на вопрос:
Гость1. Множество А инициализируется набором значений 1,2,3,4,5,6,7,8,9,10,20,30,40.
2. Операция " - " это разность множеств. В данном случае из множества А последовательно вычитаются элементы от 1 до 9 и остаются элементы 10,20,30,40.
3. Множество В инициализируется элементами 20,21,22,23,24,25,26,27,28,29,30.
4. Находится пересечение множества А и В, т.е. в А остаются только те элементы, которые есть в множестве В. Это 20 и 30.
Ответ: 20, 30
Не нашли ответ?
Похожие вопросы