среднее арифметическое наименьших отрицательных элементов каждой строки матрицы

@aziat · Регистрация: 14.03.2010

Студворк — интернет-сервис помощи студентам

найти среднее арифметическое наименьших отрицательных элементов каждой строки матрицы FP{m;n} находящихся над главной диагональю. m=6

@pazlle · 21.03.2010, 11:48

Pascal

procedure Poisk(var a:Tmatr,s:integer);
var i,j,sum,min,k:integer;
     SA:real;
begin
     min:=a[1,1]; sum:=0;
     for i:=1 to m do
       for j:=1 to m do
  //проверка элементов на отрицание, нахождение выше главной диагонали, и поиск минимальных эл-тов
          if (i>j) and (a[i,j]<0) and (a[i,j]>min) then 
              begin
                min:=a[i,j];
                sum:=sum+a[i,j];
                inc(k);// счётчик наименьших отрицательных чисел
              end;
    SA:=sum/n;
end;

Примерно так!)) Но не уверен)

@aziat 0 / 0 / 0 Регистрация: 14.03.2010 Сообщений: 7
		1
	среднее арифметическое наименьших отрицательных элементов каждой строки матрицы 14.03.2010, 21:11. Показов 1784. Ответов 1 Метки нет (Все метки) найти среднее арифметическое наименьших отрицательных элементов каждой строки матрицы FP{m;n} находящихся над главной диагональю. m=6 0

Опции темы

среднее арифметическое наименьших отрицательных элементов каждой строки матрицы

Решение