Даны действительные числа а1 а2 аn поменять местами первый наибольший элемент с последним наименьшим элементом

Даны действительные числа а1 а2 аn поменять местами первый наибольший элемент с последним наименьшим элементом
Гость
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.2, сборка 1389 от 01.03.2017 // Внимание! Если программа не работает, обновите версию! begin   var a:=Arr(3.4,2.1,2.7,5.8,4.2,2.1,5.8,3.7); a.Println;   Swap(a[a.IndexMax],a[a.LastIndexMin]); a.Println end. Результат 3.4 2.1 2.7 5.8 4.2 2.1 5.8 3.7 3.4 2.1 2.7 2.1 4.2 5.8 5.8 3.7
Не нашли ответ?
Ответить на вопрос
Похожие вопросы