В массиве поменять местами минимальный и максимальный элементы - PascalABC.NET
Формулировка задачи:
17. В массиве поменять местами минимальный и максимальный элементы.
Решение задачи: «В массиве поменять местами минимальный и максимальный элементы»
textual
Листинг программы
begin
var a := ArrRandom(ReadlnInteger('Длина массива:'), -50, 50); a.Println;
Swap(a[a.IndexMax], a[a.IndexMin]); a.Println;
end.
Объяснение кода листинга программы
В данном коде:
- Переменная
aобъявляется как массив целых чисел, длина которого считывается с помощью функцииReadlnInteger. - Функция
ArrRandomинициализирует массивaслучайными числами в указанном диапазоне. - Функция
Swapменяет местами минимальный и максимальный элементы массиваa. - Массив
aвыводится на экран с помощью функцииPrintln.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д