ввести, вывести массив, посчитать сумму эл-тов, модуль... главная программа не выходит Опции

[Guest]

помогите, пожалуйста, задача:ввести, вывести массив, посчитать сумму эл-тов
в главной программе - ошибка переполнения стека

Сообщение отредактировано: мисс_граффити - 13.06.2007 14:24

[virt]

нахождение минимума в неправильное ::

Код

  min:=mas[1,1];
  for i:=2 to m do
     for j:=2 to n do

надо так

Код

  min:=mas[1,1];
  for i:=1 to m do
     for j:=1 to n do

[klem4]

помойму минимум матрицы ищется так :

Код

imin:=1;
jmin:=1;
for i:=1 to n do
 for j:=1 to m do
  if x[i,j]<x[imin,jmin] then
   begin
        imin:=i;
        jmin:=j;
   end;