Придумать загадки про алгоритмы быстрее

1.Три актера готовятся к спектаклю. С ними работают два опытных гримера. Каждый актер должен быть накрашен и причесан. Макияж у каждого актера продолжается полчаса, а причесывание только 10 минут. Как быстро три актера смогут подготовиться к выходу на сцену?
ответ:Пятаки.
2.Я кислое и сладкое, я твердое и мягкое, я бледное и румяное
ответ:Яблоко.
3.Гладишь — ласкается, дразнишь — кусается
ответ:Собака.
4.Маленький шарик под лавкой шарит.
ответ:Мышь.
5.На стене сидит, всё время молчит. А как заговорит - все замолкают.
ответ:Школьный звонок на урок.

1. 10

2. 12

3. 3

4. 22

5. 15

6. 34

7. 3

Часть 2

1. 

Var

 n:integer;

Begin

 Write('Введи число ');

 Readln(n);

 if (n mod 2) = 0 then write(n,' чётное) else write(n,' нечётное);

End.

2.

Var

 a,b:integer;

Begin

 Write('Введи числа ');

 Readln(a,b);

 if a>b then Begin Write('a = ',b*a,' b = ',a+b) else write('a = ',a+b,' b = ',a*b);

End.

3.

Var

 n:integer;

Begin

 write('Введи двузначное число ');

 Readln(n);

 if ((n div 10) = 6) or ((n mod 10) = 6) then write('6 присутствует') else write('6 нет в этом числе');

End.

Подробнее - на - ответ:

Объяснение:

а) (А∧B)∨(C∨D)

б)¬((A∧B)∨C)

16 строк, как как 4 элемента.

а)

для удобства таблицы:

(А∧B) - 1

(C∨D) - 2

(А∧B)∨(C∨D) - 3

A   B   C   D   1   2   3

0   0   0   0   0   0  0

0   0   0   1    0   1   1

0   0   1    0   0   1   1

0   0   1    1    0   1   1

0   1   0    0   0   0  0

0   1   0    1    0   1   1

0   1   1     0   0   1   1

0   1   1     1    0   1   1

1   0   0    0   0   0  0

1   0   0    1    0   1   1

1   0   1     0   0   1   1

1   0   1     1    0   1   1

1   1   0     0   1    0  1

1   1   0     1    1    1   1

1   1   1      0   1    1   1

1   1   1      1    1    1   1

б)

для удобства таблицы:

(A∧B) - 1

(A∧B)∨C - 2

¬((A∧B)∨C) - 3

А В С 1 2 3

0 0 0 0 0 1

0 0 1  0 1  0

0 1  0 0 0 1

0 1  1  0 1  0

1  0 0 0 0 1

1  0 1  0 1  0

1  1  0 1  1  0

1  1  1  1  1  0