Вpascal abc . (двумерные массивы). указание: для каждой создайте алгоритм и программу. заполните двумерный числовой массив b(6,6) случайными целыми числами в интервале [-65; 65]. введите значения элементов массива в виде матрицы, причем на каждый элемент отведите 4 позиции. ответ каждой следует выводить с новой строки и с пояснительным текстом. кроме того, следует каждый раз производить вывод массива на экран, если в нем произошли изменения : перестановка, замена, изменение значения элементов и т. д. №1.найдите сумму положительных элементов третьего столбца. №2.обнулите отрицательные элементы, стоящие в четных строках.

Поскольку к элементам третьего столбца массива можно обращаться, как b[i,3], достаточно использовать цикл по строкам. для просмотра только четных строк массива достаточно начать со второй и менять номер строки с шагом 2. const   n = 6; var   b: array[1..n,1..n] of integer;   i,j,s: integer; begin   randomize;   writeln('исходный массив');   for i : = 1 to n do   begin       for j : = 1 to n do       begin           b[i,j]: =random(131)-65;           write(b[i,j]: 4)       end;       writeln   end;   { 1 }   s: =0;   for i: =1 to n do       if b[i,3]> 0 then s: =s+b[i,3];   writeln('значение найденной суммы: ',s);   { 2 }   i: =2;   while i< =n do begin       for j: =1 to n do           if b[i,j]< 0 then b[i,j]: =0;       i: =i+2   end;   writeln('результирующий массив');   for i: =1 to n do   begin       for j: =1 to n do write(b[i,j]: 4);       writeln   end end. тестовое решение: исходный массив     1 -28 -22 -23 -15 -35   -34 -44  57  43  33  62   56    5  58 -32  -6 -52   24 -15 -54 -45  41  32   40  31 -31  28 -31  46     7  31  56 -16 -62 -52 значение найденной суммы: 171 результирующий массив     1 -28 -22 -23 -15 -35     0    0  57  43  33  62   56    5  58 -32  -6 -52   24    0    0    0  41  32   40  31 -31  28 -31  46     7  31  56    0    0    0

ответ:python

c = 0

s = 0

for i in range(5, 28):

   c += 1

   s += i

print(s / c)