Question

Задание на фотографиях

Answer 1

program sets;

type

mn=set of 0..9;

var

a,b,c:mn;

begin

a:=[1,2,3,4,5,6];

b:=[5,6,7,8,9,0];

writeln(a+b);

writeln(a*b);

write(a-a*b);

end.

Answer 2

Да, только это все, простите, фигня, не имеющая отношение к рисункам.

Answer 3

Недогляд