Изящно и непонятно.
// PascalABC.NET 3.4, сборка 1767 от 27.08.2018
begin
var matr := MatrRandom(7, 7, 0, 100); matr.Println; // // объявление матрицы со случайными значениями в диапазоне(0, 100) и её печать
Swap(matr[0, matr.Row(0).IndexMin], matr[2, matr.Row(2).IndexMin]); // меняем местами мин. элементы первой и третьей строк.
var m := matr.ElementsWithIndexes.Where(t -> t[1] = t[2]).MaxBy(t -> t[0]); // получение максимального элемента с его позицией в матрице главной диагонали.
var s := matr.ElementsWithIndexes.Where(t -> (t[1], t[2]) in Range(0, 6).Select((t, i)-> (t, abs(i - 6)))).MaxBy(t -> t[0]); // и побочной
Println; // отступ
Swap(matr[m[1], m[2]], matr[s[1], s[2]]); // меняем местами макс. элементы диагоналей
matr.Println; // печать результата
end.
Пример вывода в приложении:
графы в информатике являются способом определения отношений в совокупности элементов. это основные объекты изучения теории графов.
базовые определения
из чего состоит граф в информатике? он включает множество объектов, называемых вершинами или узлами, некоторые пары которых связаны т. н. ребрами. например, граф на рисунке (а) состоит из четырех узлов, обозначенных а, в, с, и d, из которых b соединен с каждой из трех других вершин ребрами, а c и d также соединены. два узла являются соседними, если они соединены ребром. на рисунке показан типичный способ того, как строить графы по информатике. круги представляют вершины, а линии, соединяющие каждую их пару, являются ребрами.
какой граф называется неориентированным в информатике? у него отношения между двумя концами ребра являются симметричными. ребро просто соединяет их друг с другом. во многих случаях, однако, необходимо выразить асимметричные отношения – например, то, что a указывает на b, но не наоборот. этой цели служит определение графа в информатике, по-прежнему состоящего из набора узлов вместе с набором ориентированных ребер. каждое ориентированное ребро представляет собой связь между вершинами, направление которой имеет значение. направленные графы изображают так, как показано на рисунке (b), ребра их представлены стрелками. когда требуется подчеркнуть, что граф ненаправленный, его называют неориентированным.
