Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/7: Рейтинг темы: голосов - 7, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 07.03.2016
Сообщений: 2
1

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

29.06.2016, 11:03. Показов 1326. Ответов 1
Метки нет (Все метки)

Составить программу, которая в каждой строке матрицы D(m,n),m<=10,n<=12, находит элемент, для которого модуль разности этого элемента и среднего геометрического модулей всех элементов строки максимален. Предполагается, что матрица нулевых элементов не содержит. Вывести матрицу в виде матрицы, располагая рядом с каждой строкой найденный элемент и модуль искомой разности. срочно!
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.06.2016, 11:03
Ответы с готовыми решениями:

Составить алгоритм и программу для замены в заданном массиве Е (18) всех нулевых элементов средним геометрическим значением всех положительных элемент
Ребят помогите пожалусто сделать несколько задач. 1) Составить алгоритм и программу для замены в...

В каждой строке матрицы найти и вывести минимальный элемент и сумму всех элементов
Не получается сделать. Пробовала ввести rand, чтобы заполнялась автоматически, так перестал...

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

Найти количество элементов массива, значения которых лежат между средним арефметическим и средним геометрическим
Найти количество элементов массива A=(A1,A2,.....An) значения которых лежат между средним...

1
8 / 8 / 18
Регистрация: 05.03.2016
Сообщений: 46
29.06.2016, 13:29 2
Лучший ответ Сообщение было отмечено Bikulya как решение

Решение

Так? Прога находит минимальный элемент в строках
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
var
  a: array[1..10, 1..12] of integer;
  i, j, nr: integer;
  r: array[1..12]of real;
  sx: real;
 
begin
  for i := 1 to 10 do
    for j := 1 to 12 do
      a[i, j] := random(1, 2);
  
  for i := 1 to 10 do
    for j := 1 to 10 do
      case a[i, j] of
        1: a[i, j] := random(-20, -1);
        2: a[i, j] := random(1, 20);
      end;
  
  for i := 1 to 10 do
  begin
    sx := 1;
    
    for j := 1 to 12 do
      sx := sx * power(abs(a[i, j]), 1 / 10);
    
    for j := 1 to 12 do
      r[j] := abs(a[i, j] - sx);
    
    nr := 1;
    
    for j := 1 to 12 do
      if r[j] > r[nr] then nr := j;
    
    for j := 1 to 12 do
      write(a[i, j], ' ');
    write('    Элемент: ', a[i, nr], ', модуль искомой разности:', r[nr]);
    writeln;
  end;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.06.2016, 13:29

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

Найти количество элементов матрицы, модуль разности между которыми и средним арифметическим элементов матрицы более 1
Найти количество элементов вещественной матрицы a, модуль разности между которыми и средним...

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

Найти количество элементов матрицы, модуль разности между которыми и средним арифметическим матрицы больше 1
Задача : Найти количество элементов вещественной матрицы a, модуль разности между которыми и...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.