Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.64/22: Рейтинг темы: голосов - 22, средняя оценка - 4.64
0 / 0 / 0
Регистрация: 02.05.2011
Сообщений: 5
1

В матрице размером NxM поменять местами строку, содержащую элемент с наибольшим значением, со строкой, содержащей элемент с наименьшим значением.

02.05.2011, 17:28. Показов 4199. Ответов 1
Метки нет (Все метки)

Помогите пожалуйста!!!
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.05.2011, 17:28
Ответы с готовыми решениями:

Поменять местами строку матрицы, содержащую минимальный элемент, со строкой, содержащей максимальный
всем привет!прошу помощи! В произвольной матрице i= , j= поменять местами строку, содержащую...

Поменять местами столбец с наибольшим значением со столбцом с наименьшим значением
в массиве В(3,3) поменять местами столбец , содержащий наиб. значение со столбцом, содержащим наим....

Обработка матриц.В матрице а(3х5) поменять местами элементы с наибольшим и наименьшим значением.
В матрице а(3х5) поменять местами элементы с наибольшим и наименьшим значением. Кто поможет,...

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

__________________
1
К.О.
534 / 499 / 344
Регистрация: 26.03.2011
Сообщений: 1,141
02.05.2011, 19:39 2
Лучший ответ Сообщение было отмечено Shibalo как решение

Решение

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
var
  a: array[1..50,1..50] of integer;
  i,j,n,m,maxi,mini: byte;
  x,max,min: integer;
Begin
  randomize;
  readln(n,m);
  for i:=1 to n do
    begin
      for j:=1 to m do
        begin
          a[i,j]:=random(61)-30;
          write(a[i,j]:4);
        end;
      writeln;
    end;
  writeln;
  max:=a[1,1];
  min:=a[1,1];
  maxi:=1;
  mini:=1;
  for i:=1 to n do
  for j:=1 to m do
    begin
      if a[i,j]>max then begin
        max:=a[i,j];
        maxi:=i; end;
      if a[i,j]<min then begin
        min:=a[i,j];
        mini:=i; end;
    end;
  for j:=1 to m do
    begin
      x:=a[maxi,j];
      a[maxi,j]:=a[mini,j];
      a[mini,j]:=x;
    end;
  for i:=1 to n do
    begin
      for j:=1 to m do write(a[i,j]:4);
      writeln;
    end;
  readln
End.
2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.05.2011, 19:39

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

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

В матрице поменять местами строку, содержащую минималный элемент, со строкой содержащий максимальный элемент.
Помогите пожалуста:):):) вот задание В произвольной матрице A поменять местами строку, содержащую...

В матрице поменять местами строку, содержащую максимум, со строкой, содержащей минимум
В данной действительной матрице размера 6х9 поменять местами строку, содержащую элемент с...

Поменять столбец матрицы А с наибольшим значением со столбцом матрицы В с наименьшим значением
Даны две целочисленные матрицы A и B размером M на N, все элементы которых различны. Поменять...


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

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

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