Дан двумерный массив размером 6×6, заполненный целыми числами с клавиатуры. найдите наименьший элемент среди элементов главной диагонали.​

landeshforever landeshforever    2   22.02.2020 10:09    0

Ответы
TaPo4оК TaPo4оК  11.10.2020 11:12

PascalABC.NET

begin

 var n := 6;

 var a := ReadMatrInteger(n, n);

 var min := a[0, 0];

 for var i := 1 to n - 1 do

   if a[i, i] < min then

     min := a[i, i];

 Print('Минимальный элемент главной диагонали равен', min)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика