Дорогие программисты помогите написать программу которая находит: Среднее арифметическое элементов побочной диагонали

Question

Ira · Accepted Answer

Диагоналей, вертикалей и горизонталей то же.
Настолько заезженное задание, что достаточно набрать вопрос в любом поисковике
и вывалится несколько тысяч примеров на любом языке программирования.

Куча примеров

Вы то наверняка знаете на каком языке надо привести пример, а скрываете.
Нехорошо это.. .

Валерия · Answer

Если на Паскале - пиши на почту

Александр Черевков · Answer

Пишу только основную часть, поскольку задача сто раз писана мной и еще стопятьсот человек: 
avg := 0; 
for j := n downto 1 do 
for i := 1 to n do 
begin 
 if ( i = j ) then 
 avg := avg + A[i,j]; 
end; 
avg := avg/n;