Двумерный Массив, Последние столбцы массива Опции

[forMator]

Не получается найти последние f столбцы и вычислить их среднее арифметическое. Размерность матрицы k на l.
Запутался в циклах!Последние f столбцы нашёл,а при вычислении среднего арифметического выдаётся неправильный ответ.

[klem4]

среднее арфиметическое последних f столбцов :

s := 0;
for i := 1 to RowCount do
 for j := ColCount - f + 1 to ColCount do
  s := s + x[i, j];
s := s / (RowCount * f);

RowCount - количество строк
ColCount - количество столбцов