Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
Дарья_Дерр
0 / 0 / 1
Регистрация: 27.10.2013
Сообщений: 59
1

Двумерный массив. Найти столбец с наибольшей суммой элементов

30.03.2014, 10:49. Просмотров 816. Ответов 1
Метки нет (Все метки)

Дана прямоугольная матрица. Найти столбец с наибольшей суммой элементов.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.03.2014, 10:49
Ответы с готовыми решениями:

Массив: В произвольно заданной матрице размера 4*6 определить строку с максимальной суммой элементов и столбец с минимальной суммой.
В произвольно заданной матрице размера 4*6 определить строку с максимальной...

Двумерный массив, найти строку с максимальной и столбец с мининимальной суммой элементов
Дан двумерный массив размером n*m, заполненный случайными числами. Определить в...

Процедуры: определить столбец с наибольшей суммой и заменить на строку с наименьшей суммой элементов
Всем привет, срочно помогите пожалуйста с программой. Я ее написал (вернее не...

Двумерный массив: поменять местами столбец с минимальной суммой элементов столбца с первым столбцом массива
3. Дан двумерный массив размером n x m. Поменять местами столбец с минимальной...

Найти строку с наибольшей суммой элементов матрицы
Дан целочисленный массив x(n и m вводится пользователем)Найти строку с...

1
aex
89 / 78 / 62
Регистрация: 06.03.2014
Сообщений: 230
30.03.2014, 15:32 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
const nmax=30;
var i,j,sum,summax,imax,n: integer;
a:array[1..nmax,1..nmax] of integer;  
begin
  write('Введите размерность матрицы, n: ');  
  readln(n);
  writeln('Введите элементы матрицы: '); 
  summax:=0; 
 
  for i:=1 to n do
  begin
    for j:=1 to n do
      readln(a[i,j]);
    summax:=summax+a[i,1];
  end;
  
  writeln('Матрица: ');  
  for i:=1 to n do
  begin
    for j:=1 to n do
      write(a[i,j],' ');    
    writeln();
  end;
  
  for j:=1 to n do
  begin
    sum:=0;
    for i:=1 to n do
      sum:=sum+a[i,j];    
    if (sum>summax) then 
    begin
      summax:=sum;
      imax:=j;
    end;
  end;
  write('imax=',imax);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
30.03.2014, 15:32

Найти наименьшее из значений элементов столбца, который обладает наибольшей суммой модулей элементов.
Дана целочисленная квадратная матрица порядка 8. Найти наименьшее из значений...

Найти строку матрицы с наибольшей и наименьшей суммой элементов
Дана прямоугольная матрица. Найти строку с наибольшей и наименьшей суммой...

Найти строку матрицы с наибольшей и наименьшей суммой элементов
Дана матрица т(3,5).необходимо найти строку с наибольшей и наименьшей суммой...


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

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

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