Question

Создать двумерный массив размерностью 5*5, состоящий из целых чисел в диапазоне от -10 до 15. Вывести массив на экран. Найти сумму его наибольшего и наименьшего элементов. Вывести на экран элементы главной диагонали.

ПАСКАЛЬ ABCNET!!!!!

Answer 1

##

var n := 5;

var a := MatrRandom(n, n, -10, 15);

a.Println(4);

var s := a.ElementsByRow;

Println('Сумма max+min =', s.Max + s.Min);

for var i := 0 to n - 1 do

 a[i, i].Print