Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
MiQOnE
0 / 0 / 0
Регистрация: 22.02.2017
Сообщений: 5
#1

Определить номер столбца, в котором наибольшее количество отрицательных элементов

22.02.2017, 10:43. Просмотров 917. Ответов 3
Метки нет (Все метки)

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

Написать программу нахождения номера столбца, в котором находится наибольшее количество отрицательных элементов
Дана вещественная матрица размерности m*n , все элементы которой различны....

Найти номер столбца, в котором нет отрицательных элементов
Найти номер столбца, в котором нет отрицательных элементов. Для массива с...

Найти номер столбца матрицы, в котором нет отрицательных элементов
Дана целочисленная матрица размерности (n × n). Найти номер столбца, в котором...

Найти номер строки массива, в котором находится наибольшее количество элементов, кратных 5
Найти номер строки массива размером MxN, в котором находится наибольшее...

Найти номер строки массива, в котором находится наибольшее количество элементов, кратных 5
Найти номер строки массива размером MxN, в котором находится наибольшее...

3
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3861 / 2847 / 3632
Регистрация: 05.06.2014
Сообщений: 13,960
23.02.2017, 09:43 #2
Написать программу нахождения номера столбца, в котором находится наибольшее количество отрицательных элементов
0
egt05062000
0 / 0 / 1
Регистрация: 23.02.2017
Сообщений: 6
23.02.2017, 10:28 #3
Лучший ответ Сообщение было отмечено MiQOnE как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var
  a: array[1..100, 1..100] of integer;
  i, j: integer;
  max,vsego,nomer:integer;
begin
  for i := 1 to 100 do
  begin
    for j := 1 to 100 do
    begin
    if a[j,i]<0 then
    vsego:=vsego+1;
    end;
    if vsego >max then
    begin
    max:=vsego;
    nomer:=i;//в конце номер и будет этим столбцом
    end;
  end;
end.
0
YuryK
1030 / 847 / 337
Регистрация: 08.12.2016
Сообщений: 3,283
23.02.2017, 10:45 #4
Цитата Сообщение от egt05062000 Посмотреть сообщение
if vsego >max then
т.к. vsego нигде ни разу не обнуляется, то это условие будет верно всегда, если встретится хоть одно отрицательное число. Т.е. ваш код найдет последний столбец, в котором найдется хоть одно отрицательное число
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.02.2017, 10:45

Нахождение в матрице столбца, в котором равное количество положительных и отрицательных элементов
Написать программу для нахождения в массиве (размерностью А×В) столбца, в...

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

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


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

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

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