В заданной матрице В найти в каждой строке максимальный и минимальный элементы и поменять их местами

@Horoshaya · Регистрация: 18.05.2011

Студворк — интернет-сервис помощи студентам

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

>>В заданной матрице В найти в каждой строке максимальный и минимальный элементы-эту часть я сделала сама,вот:

Pascal

var a:array [1..10,1..10] of integer;
i,j,n,m,max,min:integer;
begin
writeln('n,m');
readln(n,m);
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
max:=a[1,1];
min:=a[1,1];
for j:=1 to m do
if a[i,j]>max then max:=a[i,j] else min:=a[i,j];
end;
writeln('max=',max:5,'min=',min:5);
end;

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

@N@stюша · 06.10.2011, 16:48

во первых у тебя ошибка при вычислении мин и макс, вместо

Pascal

for i:1 to n do begin
 max:=a[1,1];
 min:=a[1,1];
 for j:=1 to m do
 if a[i,j]>max then max:=a[i,j] else min:=a[i,j];
 end;

лучше для перемещения искать не числа, а индексы, для перемещения вводим переменную z:

Pascal

for i:1 to n do begin
max:=1; 
 min:=1; 
for j:=1 to m do
 if a[i,j]>a[i,max]
   then max:=j;
   else if a[i,j]<a[i,min]
     then min:=j; 
z:=a[i,min]; 
a[i,min]:=a[i,max]; 
a[i,max]:=z;
end;

и выводим полученный массив

@Horoshaya · 06.10.2011, 16:56 **[ТС]**

спасибо))))все пошло)))

@N@stюша · 06.10.2011, 17:10

всегда пожалуйста)))
обращайся ещё, если понадобится

@Horoshaya 0 / 0 / 1 Регистрация: 18.05.2011 Сообщений: 24
	06.10.2011, 16:56 [ТС]	3
	спасибо))))все пошло))) 0

@N@stюша 3 / 2 / 3 Регистрация: 04.10.2011 Сообщений: 11
	06.10.2011, 17:10	4
	всегда пожалуйста))) обращайся ещё, если понадобится 0

Опции темы

В заданной матрице В найти в каждой строке максимальный и минимальный элементы и поменять их местами

Решение