Вывести на экран нечетные элементы числового множества, которое является разностью двух других множеств.
Вывести на экран нечетные элементы числового множества, которое является разностью двух других множеств.
Гость
Ответ(ы) на вопрос:
Гостьconst
s1=[2..7,9,11,14..19];
s2=[3..9,12..15];
var
s3:set of byte;
n:byte;
begin
s3:=s1-s2;
foreach n in s3 do if n mod 2<>0 then Write(n,' ');
Writeln
end.
Результат выполнения программы:
11 19 17
Не нашли ответ?
Похожие вопросы