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

@babahs1 · Регистрация: 14.11.2019

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

Можно без ввода/вывода. Условие: найти среднее арифметическое положительных элементов для каждой строки для данной квадратной матрицы.

@Puporev · 11.12.2019, 05:09

Delphi

for i:=1 to n do
 begin
   s:=0;
   for j:=1 to n do
   s:=s+a[i,j];
   s:=s/n;
   //вывод среднего в строке
  end;

@babahs1 · 13.12.2019, 11:20 **[ТС]**

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

@Puporev · 13.12.2019, 11:28

Delphi

for i:=1 to n do
 begin
   s:=0;
   k:=0;
   for j:=1 to n do
   if a[i,j]>0 then
    begin
     inc(k);
     s:=s+a[i,j];
    end;
   if k=0 then s:=0 else s:=s/k;
   //вывод среднего в строке
  end;

@babahs1 2 / 2 / 0 Регистрация: 14.11.2019 Сообщений: 222
		1
	Найти среднее арифметическое положительных элементов для каждой строки для данной квадратной матрицы 11.12.2019, 01:33. Показов 682. Ответов 3 Метки нет (Все метки) Можно без ввода/вывода. Условие: найти среднее арифметическое положительных элементов для каждой строки для данной квадратной матрицы. 0

@babahs1 2 / 2 / 0 Регистрация: 14.11.2019 Сообщений: 222
	13.12.2019, 11:20 [ТС]	3
	Ваш код ищет среднее арифметическое всей строки, а не положительных элементов 0

Опции темы