Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.72/47: Рейтинг темы: голосов - 47, средняя оценка - 4.72
2 / 2 / 0
Регистрация: 18.04.2014
Сообщений: 99
1

Найти минимальный элемент матрицы, вывести его значение, номер строки и номер столбца

07.01.2016, 09:16. Показов 8799. Ответов 6
Метки нет (Все метки)

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

Помогите решить такую задачу. Находил на форуме похожую, но не помогла.
0

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

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

Определить значение максимального элемента матрицы и его координаты (номер строки и номер столбца)
Определить значение максимального элемента матрицы и его координаты (номер строки и номер столбца).

Найти номер строки и номер столбца, в котором находится минимальный элемент матрицы
Как вывести номер столбца и номер строки? Совсем запутался. Вот код: #include<iostream.h>...

Найти минимальный элемент среди максимальных элементов строк и вывести номер его столбца и строки
Добрый день! Нужна помощь Минимальный элемент среди максимальных элементов строк нашел, никак не...

Найти минимальный элемент квадратной матрицы и вывести на экран номер строки и столбца, в которых он находится
Найти минимальный элемент матрицы X(4х4) и вывести на экран номер строки и столбца, в которых он...

6
Модератор
63704 / 47265 / 32574
Регистрация: 18.05.2008
Сообщений: 114,553
07.01.2016, 09:35 2
Цитата Сообщение от StrikerNik Посмотреть сообщение
Находил на форуме похожую, но не помогла.
Так и скажи что лень делать, а не пудри мозг. Задача примитив и на форуме подобных море.
0
2 / 2 / 0
Регистрация: 18.04.2014
Сообщений: 99
07.01.2016, 10:23  [ТС] 3
Цитата Сообщение от Puporev Посмотреть сообщение
Так и скажи что лень делать
Не лень. пытался разобраться, с форума подобный код компилил, но он с ошибкой. По его подобию свой писал, но так же ошибку не могу найти. А если тебе лень помочь - не стоит отвечать.
0
Модератор
63704 / 47265 / 32574
Регистрация: 18.05.2008
Сообщений: 114,553
07.01.2016, 10:24 4
Цитата Сообщение от StrikerNik Посмотреть сообщение
с форума подобный код компилил, но он с ошибкой. По его подобию свой писал, но так же ошибку не могу найти.
Так покажи этот код, я поправлю.
0
2 / 2 / 0
Регистрация: 18.04.2014
Сообщений: 99
07.01.2016, 10:33  [ТС] 5
оке, найду и залью

Добавлено через 6 минут
Цитата Сообщение от Puporev Посмотреть сообщение
покажи этот код
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
const
nmax = 100;
type
matr = array[1..nmax, 1..nmax] of integer;
procedure zapoln(var mas: matr; const n: integer);
var
i, j: integer;
begin
for i := 1 to n do
for j := 1 to n do
mas[i, j] := random(20) - 10;
end;
procedure vivod(const mas: matr; const n: integer);
var
i, j: integer;
begin
for i := 1 to n do
begin
for j := 1 to n do
write(mas[i, j]:4);
Writeln;
end;
end;
procedure naimens(const mas: matr; const n: integer; var x, y: integer);
var
i, j, min: integer;
begin
min := mas[1, 1];
for i := 1 to n do
for j := 2 to n do
if min > mas[i, j] then
begin
min := mas[i, j];
x := j;
y := i;
end;
end;
var
n, x, y: integer;
mas: matr;
begin
Readln(n);
zapoln(mas, n);
vivod(mas, n);
naimens(mas, n, x, y);
Writeln('Min elem v ',x, 'stolbce, ',y, 'stroke.');
end.
делал по похожему на форуме. единственное различие - у него еще произведение считает. мне же нужно найти минимальный элемент, его значение, номер строки и столбца
0
Модератор
63704 / 47265 / 32574
Регистрация: 18.05.2008
Сообщений: 114,553
07.01.2016, 10:51 6
Лучший ответ Сообщение было отмечено StrikerNik как решение

Решение

Такой код можно было скачать или от большой тупости или от огромной лени.
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
uses crt;
const nmax = 10; //вряд ли будешь вводить больше 100 значений
var a:array[1..nmax,1..nmax] of integer;
    m,n,i,j,min,x,y:integer;
begin
repeat
write('Количество строк от 2 до ',nmax,' m=');
readln(m);
until m in [2..nmax];
repeat
write('Количество столбцов от 2 до ',nmax,' n=');
readln(n);
until n in [2..nmax];
writeln('Введите элементы матрицы, целые числа');
for i:=1 to m do
for j:=1 to n do
 begin
  write('a[',i,',',j,']=');
  readln(a[i,j]);
 end;
clrscr;
writeln('Матрица');
for i:=1 to m do
 begin
  for j:=1 to n do
  write(a[i,j]:4);
  Writeln;
 end;
min:=a[1,1];
x:=1;
y:=1;
for i:=1 to m do
for j:=1 to n do
if a[i,j]<min then
 begin
  min:=a[i,j];
  x:=i;
  y:=j;
 end;
Writeln('Минимальный элемент=',min,' в строке ',x,' в столбцеe ',y);
readln
end.
1
2 / 2 / 0
Регистрация: 18.04.2014
Сообщений: 99
07.01.2016, 11:11  [ТС] 7
благодарю, но я в этой теме не разобрался, поэтому не знал, рабочий он или нет
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.01.2016, 11:11

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

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

Найти минимальный элемент массива и номер его столбца. Вывести сам массив иномер столбца минимального элемента
Найти минимальный элемент массива и номер его столбца. Вывести сам массив иномер столбца...

Определить максимальный элемент матрицы А, номер его строки и номер его столбца
Помогите написать программу)Не могу сформировать одномерный массив из строки(( Дана матрица А...

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


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

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

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