Дана целочисленная квадратная матрица. Найти в каждой строке наибольший элемент и поменять его местами с элементом главной

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

Цитируем вопрос ваш вопрос

Разбор вопроса и ответ на него

Раздел 'ЕГЭ (школьный)', к которому был отнесён этот вопрос является не простой рубрикой. Для подготовки ответа на вопросы из этой рубрики специалист должен обладать широкими познаниями в различных научных областях. Однако в нашей компании таковые имеются.

Вы спрашивали:

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

const n=4;
var
a:array[1..n,1..n] of integer;
max:array[1..n] of integer;
i,j,t, index,index1:integer;
begin
randomize;for i:=1 to n do
for j:=1 to n do
a[i,j]:=random(100);
max[1]:=a[1,1];
for i:=1 to n do begin
for j:=1 to n do
if a[i,j]> max[i] then
begin
max[i]:=a[i,j];
index:=i; index1:=j;
end;
t:=a[i,i];
a[i,i]:=max[i];
a[index,index1]:=t;
end;
for i:=1 to n do
writeln(max[i]);
for i:=1 to n do
begin for j:=1 to n do
write(a[i,j]:4);
writeln;
end;
readln;
end.

К нам на почту приходит много вопросов. Мы стараемся отвечать на все. Однако вы должны понимать, что большая загруженность увеличивает время ответа. Сейчас среднее время ответа равно 14:2.