Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
every
0 / 0 / 0
Регистрация: 29.04.2014
Сообщений: 22
#1

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

03.06.2014, 23:54. Просмотров 1013. Ответов 2
Метки нет (Все метки)

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

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

Массив: Найти наименьший элемент матрицы и записать в строку, где находится этот элемент 10.
Найти наименьший элемент матрицы и записать в строку, где находится этот...

Динамические массивы: Найти наименьший элемент матрицы и записать в строку, где находится этот элемент 10
Найти наименьший элемент матрицы и записать в строку, где находится этот...

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

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

2
Svager
396 / 375 / 406
Регистрация: 14.09.2013
Сообщений: 1,204
04.06.2014, 01:10 #2
Лучший ответ Сообщение было отмечено every как решение

Решение

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
uses crt;
const nmax=20;
var a:array[1..nmax,1..nmax] of integer;
    i,j,n,m,idxi,idxj:integer;
    f:text;
begin
 assign(f,'f.txt');
  reset(f);
 readln(f,m);
  readln(f,n);
  i:=1;
  j:=1;
 for i:=1 to m do
  for j:=1 to n do
   read(f,a[i,j]);
 writeln('ГЊГ*òðèöГ* ',m,' Г*Г* ',n,' : ');
  for i:=1 to m do
   begin
    for j:=1 to n do
     write(a[i,j]:4);
     writeln;
   end;
 idxi:=1;
 idxj:=1;
 for i:=1 to m do
  for j:=1 to n do
   if a[i,j]<a[idxi,idxj] then
    begin
     idxi:=i;;
     idxj:=j;
    end;
  writeln('ГЊГЁГ*ГЁГ¬Г*ëüГ*ûé ýëåìåГ*ГІ = ',a[idxi,idxj]);
  for i:=1 to m do
   for j:=1 to n do
    begin
     a[idxi,j]:=0;
     a[i,idxj]:=0;
    end;
    
  writeln('ÍîâГ*Гї Г¬Г*òðèöГ* :');
   for i:=1 to m do
    begin
     for j:=1 to n do
      write(a[i,j]:4);
      writeln;
    end;
 close(f);
end.
0
every
0 / 0 / 0
Регистрация: 29.04.2014
Сообщений: 22
04.06.2014, 01:15  [ТС] #3
спасибо большое
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.06.2014, 01:15

Найти наибольший элемент каждой матрицы и записать 1 в ту строку и столбец, в которых он находится
Даны матрицы А(6,3) и В(4,5).Найти наибольший элемент каждой матрицы и записать...

Найти наибольший элемент каждой матрицы и записать 1 в ту строку и столбец, в которых он находится
Даны матрицы А(6,3) и В(4,5).Найти наибольший элемент каждой матрицы и записать...

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


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

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

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