Информатика, опубликовано 2018-08-22 23:57:28 by Гость
В квадратной матрице найти сумму минимального и максимального элементов главной диагонали.
Ответ оставил Гость
Const
N = 10;
Var
A:array[1..n,1..n] of integer
i,min,max,j: integer;
Begin
Randomize;
For i:=1 to n do begin
For j:=1 to n do begin
A[i,j]:= random(50);
Write(a[i,j]:4);
End;
Writeln;
End;
Writeln;
Max:=a[1,1]; min:=a[1,1];
For i:=1 to n do begin
If a[i,i] > max then max:= a[i,i];
If a[i,i] End;
Write(max, ,min);
End.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на