Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/9: Рейтинг темы: голосов - 9, средняя оценка - 5.00
мария1111

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

31.05.2012, 22:25. Показов 1883. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Матрица B состоит из 6 строк и 5 столбцов. Найти минимальный элемент и и заполнить единицами строку и столбец,на пересечении которых он находиться
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
31.05.2012, 22:25
Ответы с готовыми решениями:

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

Найти строку и столбец, на пересечении которых находится минимальный элемент
дан массив R(N,M) Найти строку и столбец, на пересечении которых находится мин. элемент. DIM b(i, j) min = b(1, 1) FOR i = 1 TO 5 ...

Определить строку и столбец, на пересечении которых находится минимальный элемент
Прога: Дан массив R(N,M). Определить строку и столбец на пересечении которых находится минимальный элемент. Delphi

1
Эксперт С++
 Аватар для valeriikozlov
4728 / 2549 / 757
Регистрация: 18.08.2009
Сообщений: 4,568
01.06.2012, 06:14
Лучший ответ Сообщение было отмечено как решение

Решение

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
var i,j,min,i_min,j_min: integer;
b:array[1..6,1..5] of integer;
begin
 randomize();
 writeln('Исходная матрица:');
 for i:=1 to 6 do begin
 for j:=1 to 5 do begin
 b[i,j]:=random(10);
 write(b[i,j],' ');
 end;
 writeln();
 end;
 min:=b[1,1]; i_min:=1; j_min:=1;
 for i:=1 to 6 do
 for j:=1 to 5 do 
 if b[i,j]<min then begin
 i_min:=i; j_min:=j; min:=b[i,j];
 end;
 for i:=1 to 5 do
 b[i_min,i]:=1;
 for i:=1 to 6 do
 b[i,j_min]:=1;
 writeln('Полученная матрица:');
 for i:=1 to 6 do begin
 for j:=1 to 5 do 
 write(b[i,j],' '); 
 writeln();
 end;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
01.06.2012, 06:14
Помогаю со студенческими работами здесь

Удалить из матрицы строку и столбец, на пересечении которых находится минимальный элемент
Нужна помощь с задачками по VBA Сформировать двумерный массив. Удалить из него строку и столбец, на пересечении которых находится...

Удалить из массива строку и столбец, на пересечении которых находится минимальный элемент
Помогите исправить ошибку . Задание :Сформировать двумерный массив. Удалить из него строку и столбец, на пересечении которых находится...

Определить строку и столбец матрицы, на пересечении которых находится минимальный элемент
Дан массив R (N,М). Определить строку и столбец на пересечении которых находится минимальный элемент.

Из двумерного массива удалить строку и столбец на пересечении которых находится минимальный элемент
Из двумерного массива удалить строку и столбец на пересечении которых находится минимальный элемент. Задавать матрицу так, чтобы...

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


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при создании или изменении элементов справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru