Var a,b:integer;
begin;
readln(a);
readln(b);
if a>b then write('Первое');
if a<b then write('Второе');
if a=b then write('=');
<span>end.</span>
Как-то так. Надеюсь поймёшь. Должно быть правильно)
По формуле включений-исключений
35 = 24 + 18 + 12 - 5 - 10 - 8 + х
х = 4
Чтобы понять формулу, надо нарисовать 3 круга которые имеют общую область пересечения
1)Явления природы
2)Транспортные средства
3)Предметы мебели
4)Детские предметы
5)Живые организмы
6)Домашние животные
7)Единицы измерения
8)Обувь
9)Существительные женского рода
10)Изменяются
11)Члены предложения
12)Члены предложения
13)Геометрические фигуры
14)Вывод информации
15)