Тест по теме "Множество"

Что будет выведено на экран в результате выполнения программы: var s1,s2,s3: set of byte;i,sm1,sm2,sm3: integer; begin s1:= [2..6]; s2:=[8..9,11]; s3:= [1..5,254..255]; sm1:=0; sm2:=sm1; sm3:=sm1; for i:= 0 to 256 do if i in s1 then inc(sm1) else if i in s2 then inc(sm2) else if i in s3 then inc(sm3); write(sm1:4,sm2:4,sm3:4); end.

5 3 3

5 4 3

5 3 4

5 3 5

5 4 5

Программа вызовет ошибку при компилации

Программа вызовет ошибку при выполнении

Clear selection

Что называется объединением множеств:

это множество, которому принадлежат те и только те элементы, которые одновременно принадлежат всем данным множествам

множество, содержащее в себе все элементы исходных множеств

это теоретико-множественная операция, результатом которой является множество, в которое входят все элементы первого множества, не входящие во второе множество

это множество, элементами которого являются всевозможные упорядоченные пары элементов исходных множеств

Clear selection

Какие операции допустимы над множествами:

пересечение множеств

разность множеств

сложение множеств

вычитание множеств

Clear selection

Что будет выведено на экран в результате выполнения программы: var sc: set of char; ss:string;i: integer; begin sc:= ['а','е','и','о','у','э','ю','я']; ss:='крокодильчики'; for i:=0 to length(ss) do if ss[i] in sc then write(ss[i]); end.

¶ooиии

¶oи

ooиии

oи

oии

Программа вызовет ошибку при компилации

Программа вызовет ошибку при выполнении

Clear selection

Что такое множество:

это структурированный тип данных, представляющий собой набор взаимосвязанных по какому-либо признаку или группе признаков объектов, которые можно рассматривать как единое целое

это синтаксическая единица языка, определяющая способ вычисления некоторого значения

параметры программы, значения которых могут изменяться в процессе ее выполнения

это последовательность литер

Clear selection

Что будет выведено на экран в результате выполнения программы: var sc,s1,s2: set of char;i,sm1,sm2: integer; begin sc:= ['a'..'f','A']; s1:=sc + ['1'..'8']; s2:= s1 - ['F'..'a']; s1:= s2*['a','b','3'..'6']; sm1:=0; sm2:=sm1; for i:= 32 to 127 do if char(i) in sc then inc(sm1) else if char(i) in s1 then inc(sm2); write(sm1:4,sm2:4); end.

7 4

7 6

6 4

6 0

6 7

Программа вызовет ошибку при компилации

Программа вызовет ошибку при выполнении

Clear selection

Что будет выведено на экран в результате выполнения программы: var sb: set of byte;i,s: integer; begin sb:= [1,4..7,11]*[5..10]; s:=0; for i:= 6 to 12 do if i in sb then begin inc(s,i); if i mod 4 = 0 then sb:=sb + [i]; end; write(s:3); for i:= 6 to 12 do if i in sb then inc(s); write(s:3); end.

13 15

13 14

24 26

24 25

23 24

Программа вызовет ошибку при компилации

Программа вызовет ошибку при выполнении

Clear selection

Что будет выведено на экран в результате выполнения программы: var sb: set of byte;i,sm1,sm2: integer; begin sb:= [2..5,8]; sm1:=0; sm2:=sm1; for i:= 2 to 9 do if (([2..5,8] + [3..6]) >= sb) then begin inc(sm1); sb:=sb +[i]; end; for i:=1 to 10 do if i in sb then inc(sm2); write(sm1:4,sm2:4); end.

6 6

7 7

8 7

6 7

7 6

Программа вызовет ошибку при компилации

Программа вызовет ошибку при выполнении

Clear selection