[angvelem]

Клавишу F7 не отменили, прошагай и узнаешь где ошибка. И привыкай к Дельфи. Результирующие результаты удобнее писать Result := "что-то-там", а не, к примеру, sum_stolb := sum. В итоге, первая функция перепишется так:

Код:

//  Функция, считающая сумму эллементов в заданном столбце 
function Sum_stolb(mas : arr; stolbez, n_kon_mas : Integer) : Real;
var
  I : Integer;    
begin
  Result := 0;      
  for I := 0 to n_kon_mas - 1 do  
     Result := Result + mas[stolbez, I];
end; //  Sum_stolb