Задан одномерный массив а(n) (n =90). поменять местами - вопрос №1016460190 от щувовтслалтв 09.02.2020 01:00

Question

Информатика: Задан одномерный массив а(n) (n =90). поменять местами максимальный и минимальный элементы массива a(n). преобразованный массив вывести на экран.(паскаль)

щувовтслалтв · Answer

begin

var n := ReadInteger;

var a := ArrRandom(n, -99, 99);

a.Println;

var (imax, imin) := (a.IndexMax, a.IndexMin);

Swap(a[imax], a[imin]);

a.Println;

end.

Пример работы на рисунке.

Задан одномерный массив а(n) (n< =90). поменять местами максимальный и минимальный элементы масси

Задан одномерный массив а(n) (n< =90). поменять местами максимальный и минимальный элементы массива a(n). преобразованный массив вывести на экран.(паскаль)

Задан одномерный массив а(n) (n< =90). поменять местами
максимальный и минимальный элементы массива a(n). преобразованный
массив вывести на экран.(паскаль)