двумерные массивы,не знаю как делать

[Кааатя]

Задан двумерный массив, состоящий из N строк и M столбцов (N, M<10). Написать программу определения суммы значений элементов, распо¬ложенных по контуру данного массива.



Умники и умницы,помогите пожалуйста,напишите программу на паскале!(

[Serge_Bliznykov]

так (практически "в лоб") устроит?

  sum := 0;
  for i:=1 to M do sum := sum + A[1,i]+A[N,i]; {верхняя и нижняя горизонтальная граница}
  for i:=2 to N-1 do sum := sum + A[i,1] + A[i,M]; {первый и последний столбцы}