0 / 0 / 0
Регистрация: 13.02.2010
Сообщений: 3
1

поменять местами первый максимальный и последний минимальный элементы двумерного массива.

13.02.2010, 23:54. Показов 1501. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
поменять местами первый максимальный и последний минимальный элементы двумерного массива.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.02.2010, 23:54
Ответы с готовыми решениями:

Поменять местами первый максимальный и последний минимальный элементы двумерного массива
Помогите пожалуйста решить задачи 1. Поменять местами первый максимальный и последний...

Поменять местами первый максимальный и последний минимальный элементы массива
Дан двумерный массив. поменять местами первый максимальный и последний минимальный...

Поменять местами первый положительный и последний отрицательный элементы массива
Дан одномерный массив целых чисел. Поменять местами первый положительный и последний отрицательный...

Поменять местами первый максимальный и последний минимальный элементы массива
Дан двумерный массив. Поменять местами первый максимальный и последний минимальный элементы...

2
1915 / 1065 / 384
Регистрация: 06.12.2008
Сообщений: 2,802
14.02.2010, 00:06 2
Лучший ответ Сообщение было отмечено Andrew8 как решение

Решение

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
49
50
51
52
53
54
55
56
uses crt;
var a:array[1..100,1..100] of integer;
    i,j,n,m,max,min,imax,jmax,imin,jmin,x:integer;
begin
ClrScr;
Randomize;
Write('n=');
Readln(n);
Write('m=');
Readln(m);
for i:=1 to n do
begin
 for j:=1 to m do
 begin
  a[i,j]:=random(20)-10;
  Write(a[i,j]:4);
 end;
Writeln;
end;
Writeln;
max:=a[1,1];
min:=a[1,1];
imin:=1;
jmin:=1;
imax:=1;
jmax:=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];
   imax:=i;
   jmax:=j;
   break;
  end;
 if a[i,j]<=min then
  begin
   min:=a[i,j];
   imin:=i;
   jmin:=j;
  end;
end;
x:=a[imin,jmin];
a[imin,jmin]:=a[imax,jmax];
a[imax,jmax]:=x;
Writeln('Max ',max,' [',imax,',',jmax,']');
Writeln('Min ',min,' [',imin,',',jmin,']');
for i:=1 to n do
begin
 for j:=1 to m do
  Write(a[i,j]:4);
  Writeln;
end;
Readln;
end.
0
0 / 0 / 0
Регистрация: 13.02.2010
Сообщений: 3
14.02.2010, 00:25  [ТС] 3
спасибо большое!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
14.02.2010, 00:25
Помогаю со студенческими работами здесь

Поменять местами первый максимальный и последний минимальный элементы матрицы
Дан двумерный массив.поменять местами первый максимальный и последний минимальный элемент.ЧЕРЕЗ...

Поменять местами первый максимальный и последний минимальный
поменять местами первый максимальный и последний минимальный

В каждой строке двумерного массива (n × m) поменять местами первый и максимальный элементы строки
В каждой строке двумерного массива (n × m) поменять местами первый и максимальный элементы строки.

Поменять местами первый и последний элементы массива
uses crt; const n=10; var a:array of integer; i,k1,k2,x:integer;...

Поменять местами первый и последний элементы массива
Дан одномерный массив, подсчитать: 1. Максимальный элемент 2. Минимальный элемент 3. Поменять...

Поменять местами последний и минимальный элементы массива.
Дан массив A размера N. Поменять местами последний и минимальный элементы массива. Решить задачу...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru