Здравствуйте!
Мне нужно составить функцию, которая будет находить строку с наименьшей суммой.
Динамический массив Mas(N,S) N, S задаются вручную, элементы массива тоже.
Попробовал написать функцию сам:
Код:
function MinSum(Mas:T2Ar_Real): Real;
var i,j : integer; Massiv: T_Mxy ;
Summa, Min: Real;
begin
summa:=0;
for i:=0 to S-1 do
begin
for j:=0 to N-1 do Summa:=Summa+Mas[i,j];
Massiv[i]:=Summa; // Ошибка тут почему то!!!! =(( Он выделяет это поле синим и все останавливается
end;
Min:=Massiv[0];
for i:=0 to S-1 do
if Min < Massiv[i] then Min:=Massiv[i];
MinSum:=Min;
end;
Помогите пожалуйста! Исправьте или предложите свой вариант, если не трудно! Заранее спасибо!