# item; procedure

item; procedure SelectionSort (var Mas: massive1); var i: index1; begin for i := (N-1) downto 1 do Swap(Mas[i], Mas[IndexMax(Mas,0,i)]); end; Если представляет интерес лучший результат &quot;по задачам&quot;, то к массиву Results следует применить первый вариант алгоритма поиска максимума и обрабатывать поле &quot;задачи&quot;. Если же важна фамилия победителя, то достаточно установить индекс ячейки с лучшим результатом, а в конце - вывести содержимое соответствующего поля отобранной компоненты. В обоих случаях систематической обработке подвергается только одно из полей записей-компонент вектора, это поле Number и его можно рассматривать как ключевое. Такая обработка, связанная с перебором именно ключей, достаточно типична. Например, набор сначала упорядочивается по ключам записей в соответствии с лексикографическим порядком, а далее используется информация, размещенная в других полях компонент массива, - теперь уже в новом, &quot;хронологическом&quot; порядке. Учитывая

Индекс
Элементарные функции Линейные уравнения Нелинейные уравнения Случайные числа