Укажите количество источников и приемника информации в ситуации: трое детей смотрят мультфильм по телевизору​

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
  var s:=a.IndexesOf(x->x mod 10=0);
  if s.Count=0 then Writeln('Нет элементов, оканчивающихся на 0')
  else begin
    Write('Номера элементов, оканчивающихся на 0: ');
    s.Select(i->i+1).Println
    end
end.

Примеры
n= 12
-41 46 29 -13 -43 -21 48 43 41 -48 -19 -44
Нет элементов, оканчивающихся на 0

n= 16
37 -48 39 32 -6 21 -48 34 6 12 -10 -15 40 -36 46 26
Номера элементов, оканчивающихся на 0: 11 13

Построим диаграмму Эйлера-Венна и обозначим каждую область цифрой.
Тем самым получается, что:
• Ев­клид & Ари­сто­тель & Пла­тон - это область под номером 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