Целочисленный массив из 3 строк и 3 столбцов заполнить случайными числами в диапазоне от 0 до 50. Найти:
а) сумму всех элементов массива;
б) сумму элементов массива кратных трем.

const

 n = 3;

var

 a: array[1..n, 1..n] of integer;

 i, j, k, sum, sum2, x: integer;

begin

 sum := 0;

 sum2 := 0;

 randomize;

 writeln('Исходный массив');

 for i := 1 to n do

 begin

   for j := 1 to n do

   begin

     a[i, j] := 1 + random(50);

     write(a[i, j]:4);

     sum := sum + a[i, j];

     if a[i, j] mod 3 = 0 then

       sum2 := sum2 + a[i, j]

   end;

   writeln;

 end;

 Writeln('Сумма всех элементов массива: ', sum);

 Writeln('Сумма всех элементов массива кратных 3: ', sum2);  

end.

1+2+3+4+5+6+7+8+9+10+11+12=78

78: 2=39

делим так, чтобы в обеих частях сумма чисел была 39. для этого линия раздела должна проходить между 3 и 4, а также между 9 и 10. в одной половине 10+11+12+1+2+3=39 и в другой 4+5+6+7+8+9=39

разложим 78 на простые множители:

78 | 2

39 | 3

13 | 13

  1

так как на циферблате всего 12 чисел, получаем, что его ещё можно разделить на 3 и на 6 частей, чтобы суммы чисел в частях были равны:

78: 3=26 (11+12+1+2=26, 9+10+3+4=26, 5+6+7+8=26)

78: 6=13 (12+1=13, 11+2=13,10+3=13, 9+4=13, 8+5=13, 7+6=13)

интерфейс, ёмкость, размер, время произвольного доступа, скорость вращения шпинделя, надежность, количество операций ввода-вывода в секунду, потребление энергии, сопротивляемость ударам, скорость передачи данных, объем буфера.

(жирным шрифтом для всех, обычным для жестких, флеш и тд.)