12. Постройте как можно более полный граф для понятий п. 3.2.4.

Const n=10;
var 
a:array[1..n,1..n] of integer;
b:array[1..n] of integer;
i,j,s:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do
 begin
 for j:=1 to n do
  begin
  a[i,j]:=random(21);
  write(a[i,j]:4);
  end;
  writeln;
 end;
for i:=1 to n do
 begin
 s:=0;
 for j:=1 to n do s:=s+a[i,j];
 b[i]:=s;
 end;
writeln('Полученный массив:');
for i:=1 to n do write(b[i]:4);
writeln; 
end.

Пример:
Исходный массив:
   8  12  16  16  19  15  11  11  13   7
   7   3  20   3  13   2  20  18   9   2
  18  11  17   0   4   0  18   3  17  12
  12   9  18   9  18   4   7  15   4  20
  17  12  13  20  12  20   4  10  16  18
  15  19   2   1  18  20  13   1  19   3
  12   7   8  13   3   3  15  13   2  15
  15   0  20   9  20  14   3  19   6  20
  12   4  19   0  19   2  18   4  12  10
   3   7   5  15  15   3  19   9  10   8
Полученный массив:
 128  97 100 116 142 111  91 126 100  94

Построим диаграмму Эйлера-Венна и обозначим каждую область цифрой.
Тем самым получается, что:
• Ев­клид & Ари­сто­тель & Пла­тон - это область под номером 4 и она равна 120
• Ев­клид & Пла­тон - это область под номерами 5 и 4 и их сумма равна 280
• Ев­клид & Ари­сто­тель - это область под номерами 2 и 4 и их сумма равна 780

Нам надо найти сколько страниц будет найдено по следующему запросу Евклид & (Аристотель|Платон), т.е. получается что нам надо найти сумму 2, 4 и 5 области.

Далее мы знаем, что 4ая область равна 120, тогда мы можем найти чему равна 5 область (от 280 отнимаем 120 получаем 160)
Находим 2 область, а это 780-120 получаем 660. Зная все эти области складываем их 660+120+160 получаем 940