30+15 1. составьте функцию вычисления среднего значения элементов массива. 2. в матрице размером n×m удалите столбец, сумма элементов которого максимальна. необходимо создать новую матрицу нужного размера и переписать в нее все столбцы, кроме удаленного. все решение на паскале

Const     n = 3;     m = 4; type     mass = array[1..n,1..m] of integer; ///функция вычисления среднего арифметического элементов массива function sr(a: mass): real; var     i,j: integer; begin result: =0; for i: = 1 to n do       for j: = 1 to m do               result: =result+a[i,j]; result: =result/(m*n); end; var     a: mass;     b: array[1..n,1..m-1] of integer;     i,j,jmax,k: integer;     s,maxs: real; begin randomize; writeln('исходная матрица: '); for i: = 1 to n do       begin       for j: = 1 to m do               begin               a[i,j]: =random(21)-10;               write(a[i,j]: 3,' ')               end;       writeln       end; writeln('среднее арифметическое её элементов: ',sr(a)); writeln; maxs: =0; jmax: =1; for i: = 1 to n do       maxs: =maxs+a[i,1]; for j: = 2 to m do       begin       s: =0;       for i: = 1 to n do               s: =s+a[i,j];             if s > maxs then             begin             jmax: =j;             maxs: =s;             end;       end; k: =0; for j: = 1 to m do       if jmax < > j then             begin             k: =k+1;             for i: = 1 to n do                     b[i,k]: =a[i,j];             end; writeln('новая матрица: '); for i: = 1 to n do       begin       for j: = 1 to m-1 do               write(b[i,j]: 3,' ');       writeln       end; end. пример работы программы: исходная матрица:   10    6  10    2   3    5  -3    8   8    2    0  -9 среднее арифметическое её элементов: 3.5 новая матрица:   6  10    2   5  -3    8   2    0  -9

Ана джавке не пойдет? эти языки вроде похожи int[] array = new int[тут кол-во элементов] //массив надеюсь сам заполнишь int maxitem = 0; int maxindex = 0; for (int i = 0; i < array.length; i++) {     if (maxitem < array[i]) {       maxitem = array[i];       maxindex = i;     } } system.out.println(maxindex + ": " + maxitem);