Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
DimaIT
0 / 0 / 0
Регистрация: 07.12.2014
Сообщений: 16
1

В матрице X найти строку с минимальной и столбец с максимальной суммой элементов

13.12.2014, 23:39. Просмотров 907. Ответов 2
Метки нет (Все метки)

Спасайте!Не могу решить((
Дана матрица X размерности nXm.В матрице X найти строку с минимальной и столбец с максимальной суммой элементов. Переписать в матрицу Y размерности (n-1,m-1) все строки и столбцы, кроме найденных.
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.12.2014, 23:39
Ответы с готовыми решениями:

В матрице найти столбец с максимальной суммой элементов
найти столбец с максимальной суммой элементов

В матрице найти строку с минимальной суммой элементов.
Помогите очень срочно надо. Дан двумерный массив. Найти строку с минемальной суммой элементов.

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

В матрице поменять местами строки с максимальной и минимальной суммой элементов
Помогите плиз. Заданы 2 матрицы действительных чисел размером 5х6 и 8х7. В матрице поменять...

найти строку с максимальной суммой модулей элементов.
Среди тех строк целочисленной матрицы, которые содержат только нечетные элементы, найти строку с...

2
JokeR.BY
CAPITAL OF ROCK!
1278 / 705 / 982
Регистрация: 03.03.2010
Сообщений: 2,284
Завершенные тесты: 2
14.12.2014, 02:44 2
Лучший ответ Сообщение было отмечено DimaIT как решение

Решение

наверное самое костыльное, что я писал последнее время...
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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
var
    x, y : Array[1..100, 1..100] Of ShortInt;
    i, j, n, m, iMin, jMax, iR, jR : Byte;
    max, min, sum : Integer;
begin
    Randomize;
    repeat
        Write('n=');
        ReadLn(n);
    until (n <= 100);
    repeat
        Write('m=');
        ReadLn(m);
    until (m <= 100);
    min := 32767;
    WriteLn('Исходный массив');
    for i := 1 to n do
    begin
        sum := 0;
        for j := 1 to m do
        begin
            x[i, j] := Random(199) - 99;
            Write(x[i, j]:4);
            sum := sum + x[i, j];
        end;
        if (min > sum)
        then
        begin
            min := sum;
            iMin := i;
        end;
        WriteLn;
    end;
    max := -32768;
    for j := 1 to m do
    begin
        sum := 0;
        for i := 1 to n do
            sum := sum + x[i, j];
        if (max < sum)
        then
        begin
            max := sum;
            jMax := j;
        end;
    end;
    WriteLn;
    WriteLn('minID=', iMin, '    maxID=', jMax);
    i := 1; j := 1; iR := 0;
    WriteLn;
    for i := 1 to n do
        if (i = iMin)
        then
            Inc(iR)
        else
        begin
            jR := 0;
            for j := 1 to m do
                if (j = jMax) then
                    Inc(jR)
                else
                begin
                    y[i - iR, j - jR] := x[i, j];
                    Write(y[i - iR, j - jR]:4);
                end;
            WriteLn;
        end;
end.
1
DimaIT
0 / 0 / 0
Регистрация: 07.12.2014
Сообщений: 16
15.12.2014, 19:22  [ТС] 3
Спасибо большое)
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
15.12.2014, 19:22

Найти строку с минимальной по модулю суммой элементов над главной диагональю матрицы
В закрашенной матрице Z(5,5) найти рядок с минимальной по модулю суму элементов . Вывести на экран...

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

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


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

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

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