Составьте дерево для вычисления логических выражений и таблицу истинности этого выражения а+а& в+а& с

Var
a : array[1..10] of word;
max : word;
begin
   
  randomize;
 
  for I : byte := 1 to 10 do
  a[i] := random(1, 60000);

  max := 0;
  for I : byte := 1 to 10 do
  if a[i] > max then max := a[i];

  writeln(max*3);

end.

Добавлю и объяснение. Алгоритм заполняет целочисленный массив из десяти элементов случайными числами. Возможны диапазон числе: от 1 до 60000. Затем в следующем цикле выискивается максимальное число, которое выдал генератор случайных чисел. В строке writeln выводится значение этого числа умноженное на три.

Заменяем каждый разряд на код из таблицы.

Двоичная СС Восьмеричная СС

000                                    0

001                                     1

010                                     2

011                                     3

100                                     4

101                                     5

110                                     6

111                                     7

Получаем числа:

1024757520 (7) = 001000010100111101111101010000 (2)

1232400565 (7) = 001010011010100000000101110101 (2)

Складываем (0 в начале числа можно убрать):

1000010100111101111101010000 + 1010011010100000000101110101 = 10010101111011110000011000101

Меняем 1 на 0, 0 на  1:

10010101111011110000011000101 = 01101010000100001111100111010

Двоичная СС Шестнадцатеричная СС

0000                               0

0001                               1

0010                               2

0011                               3

0100                               4

0101                               5

0110                               6

0111                                       7

1000                               8

1001                               9

1010                               A

1011                                       B

1100                               C

1101                                       D

1110                                       E

1111                                       F

Получаем число:

1101 0100 0010 0001 1111 0011 1010 (2) = D421F3A (16)