Информатика, опубликовано 2018-08-22 22:12:13 by Гость
Дана квадратная матрица, заполненная случайными числами указать индексы всех элементов, имеющих наибольшее значение.
Ответ оставил Гость
Program gt;
var a:array[1..100,1..100]of integer;
n,i,max,,j:integer;
begin
read(n);
for i:=1 to n do
for j:=1 to n do
a[i,j]:=random(100)-50;
max:=a[1,1];
for i:=1 to n do
begin
for j:=1 to n do
begin
if(a[i,j]>max)then max:=a[i,j];
end;
end;
for i:=1 to n do
begin
for j:=1 to n do
begin
if(a[i,j]=max)then writeln(i, ,j);
end;
end;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на