0 / 0 / 0
Регистрация: 21.02.2012
Сообщений: 36
1

В прямоугольной матрице каждый нулевой элемент заменить средним арифметическим значением

21.02.2012, 00:59. Показов 1055. Ответов 1
Метки нет (Все метки)

Помогите решить

В прямоугольной матрице каждый нулевой элемент заменить средним арифметиче-ским значением ненулевых элементов той строки, в которой расположен данный ну-левой элемент. Если в строке несколько нулевых элементов, то они должны быть за-менены одним и тем же значением.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.02.2012, 00:59
Ответы с готовыми решениями:

Заменить каждый элемент главной диагонали средним арифметическим элементов соответствующей ему строки.
помогите пожалуйста решить задачу на паскале: Дана целочисленная матрица порядка n. Заменить...

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

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

В прямоугольной матрице заменить каждый нулевой элемент на среднее арифметическое строки
В прямоугольной матрице заменить каждый нулевой элемент на среднее арифметическое строки, в которой...

1
3450 / 2388 / 2135
Регистрация: 04.12.2011
Сообщений: 3,966
21.02.2012, 02:21 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
const
  n=8;
var
  a: array[1..n,1..n] of real;
  b: array[1..n] of real;
  i,j,k: integer;
  s,avr: real;
begin
  randomize;
  for i:=1 to n do
  begin
    s:=0; k:=0;
    for j:=1 to n do
    begin
      a[i,j]:=random(10);
      write(a[i,j]:7:0);
      if a[i,j]<>0 then inc(k);
      s:=s+a[i,j];
    end;
    avr:=s/k;
    b[i]:=avr;
 
    writeln; writeln;
  end;
  writeln;
 
  for i:=1 to n do
  writeln('   srednee ',i,'-oi stroki: ',b[i]:7:2);
  writeln;
 
  for i:=1 to n do
  begin
    for j:=1 to n do
    begin
      if a[i,j]=0 then a[i,j]:=b[i];
      write(a[i,j]:7:2);
    end;
    writeln; writeln;
  end;
  writeln;
  readln;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.02.2012, 02:21
Помогаю со студенческими работами здесь

В массиве каждый элемент, равный нулю, заменить средним арифметическим всех элементов
Создать числовой массив А.Значение N задается константой.Каждый элемент,равный нулю,заменить...

Каждый элемент массива, равный нулю, заменить средним арифметическим всех элементов
Пожалуйста, помогите решить вот, это я правда не знаю что делать: Создать числовой массив A. ...

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

Каждый элемент массива, равный нулю, заменить средним арифметическим всех элементов
Создать одномерный числовой массив A. гдеN константа,Каждый элемент,равный нулю ,заменить средним...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru