Задана матрица Z(5,4). Найти в каждой строке, если там есть отрицательный элемент

@REY-93 · Регистрация: 19.11.2013

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

На форуме есть такое задание но сделана в C++, нужно на паскале. За ранее спасибо!!!

Задана матрица Z(5,4). Найти в каждой строке, если там есть отрицательный элемент, среднее арифметическое всех элементов, исключая нулевые и записать эти значения в массив В. Вывести исходную матрицу Z и массив B.

@GreenForest · 21.12.2013, 16:40

Pascal

{Ввод матрицы}
For i:=1 to n do
 begin
   writeln('');
   For j:=1 to m do
      Writeln(a[i,j]:3);
 end;
For i:=1 to n do
   For j:=1 to m do
       If a[i,j] < 0 then 
             begin
                  k:=0;
                         For j:=1 to m do
                            begin
                               If a[i,j] <> 0 then b[i]:=b[i]+a[i,j];
                               inc(k);
                             end;
                    b[i]:=b[i]/k;
              end;
For i:=1 to n do
Write(b[i]:3);
End.

Точно не уверен, но кажется так

@REY-93 1 / 1 / 1 Регистрация: 19.11.2013 Сообщений: 40
		1
	Задана матрица Z(5,4). Найти в каждой строке, если там есть отрицательный элемент 21.12.2013, 15:42. Показов 2318. Ответов 1 Метки нет (Все метки) На форуме есть такое задание но сделана в C++, нужно на паскале. За ранее спасибо!!! Задана матрица Z(5,4). Найти в каждой строке, если там есть отрицательный элемент, среднее арифметическое всех элементов, исключая нулевые и записать эти значения в массив В. Вывести исходную матрицу Z и массив B. 0

	21.12.2013, 16:40

Задана матрица Z(5,4). Найти в каждой строке, если там есть отрицательный элемент

Решение