Пожалуйста, помогите с задачей! Уже неделю с ней мучаюсь- ничего не получается!

Дана матрица А={a [i, j] }, {i=1, 2, .., n; j = 1, 2, .., m}
n=4 и m=7.
Найти среднее значение элементов 1 столбца и среднее значение элементов 2 столбца.
В каждом столбце подсчитать число элементов, больших среднего значения.
Среди элементов первых двух столбцов найти наибольший и поменять его с элементом последнего столбца, принадлежащим той же строчке. Напечатать элементы исходной и преобразованной матрицы.

для j>3 a[i,j]=x+y/(i+j*scrt(x)
В остальных случаях а=x+x/j!+ exp(5*ln(x))/i

Заранее большое спасибо!

В цикле, задающем матрицу, не хватает операторных скобок. В результате выполняется только первый оператор v:=v*j;