Для каждой матриц найти среднее арифметическое

[Anna_om]

A(4,4) B(5,5)
Для каждой матриц найти среднее арифметическое элементов расположенных выше главной диагонали и сумму элементов побочной диагонали.Ввод-процедура,поиск-процедура,вывод в главной программе.
Помогите пожалуйста решить товарищи)

[rrrFer]

Непомешает указать на каком языке надо решить и чем именно помочь.
на Си суммуэлементов выше диагоналиискать можно как то так:

Код: Выделить всё

for(s=i=kol=0;i<n;i++)
    for(j=i+1;j<n;j++){
        kol++
        s+=arr[i][j];
    }
cout<<float(s)/kol;

Сумму элементов побочной наверно так:

Код: Выделить всё

for(s=i=0;i<n;i++)
       s+=a[i][n-i-1];

[Anna_om]

На языке турбо паскаль

[Хыиуду]

Алгоритм привели, в чем еще сложность? Синтаксис паскаля есть в учебниках.