Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 02.02.2013
Сообщений: 40
1

В каждой строке матрицы выбрать элемент с наименьшим значением

09.02.2013, 17:10. Показов 1065. Ответов 1
Метки нет (Все метки)

Дана матрица порядка n*m, все элементы которой различны. В каждой строке выбирается элемент с наименьшим значением, затем среди этих чисел выбирается наибольшее. Указать индексы элемента с найденным значением.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.02.2013, 17:10
Ответы с готовыми решениями:

В каждой строке матрицы выбрать элемент с наименьшим значением
дана действ. матрица размерностью mxn, все элементы которой различны. В каждой строке выбирается...

В каждой строке матрицы выбрать элемент с минимальным значением
В каждой строке матрицы размера N*M выбрать элимент с минимальным значением, затем среди этих чисел...

В каждой строке матрицы выбрать элемент с наименьшим значением
Задана вещественная матрица размерности пхт, все элементы которой различны. В каждой строке выбрать...

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

__________________
1
Модератор
1623 / 1078 / 485
Регистрация: 17.07.2012
Сообщений: 5,308
09.02.2013, 18:47 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
program m2;
uses crt;
var a:array[1..100,1..100] of Integer;
i,j,m,n,maxa,maxb,min:Integer;
begin
repeat
ClrScr;
Write('Введите размеры матрицы:');
Readln(n,m);
until (m in [1..100]) and (n in [1..100]);
Writeln('Введите значения элементов матрицы:');
for i:=1 to n do
for j:=1 to m do Read(a[i,j]);
Writeln('Введенная матрица:');
for i:=1 to n do
begin
for j:=1 to m do Write(a[i,j]:4);
Writeln;
end;
for i:=1 to n do
begin
min:=1;
for j:=2 to m do if a[i,j]<a[i,min] then min:=j;
if (maxa=0) and (maxb=0) then
begin
maxa:=i;
maxb:=min;
end else
if a[i,min]>a[maxa,maxb] then
begin
maxa:=i;
maxb:=min;
end;
end;
Writeln('Наибольший элемент среди наименьших элементов строк:',a[maxa,maxb],',его индексы:',maxa,',',maxb);
Readln;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.02.2013, 18:47

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

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

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

Выбрать в каждой строке матрицы из символов символ с наименьшим кодом и поставить его первым в строке матрицы.
Помогите написать программую Дана матрица размером M x N, состоящая из символов. Выбрать в...

В каждой строке матрицы выбрать элемент с наименьшим значением
Дана действительная матрица размера N x M, все элементы которой различны. В каждой строке...

В каждой строке матрицы выбрать элемент с наименьшим значением
Дана действительная матрица размера N*M, все элементы которой различны. В каждой строке выбирается...

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


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

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

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