Задан одномерный массив а(n) (n =90). поменять местами - вопрос №9010165169 от danilkatsurkan23 12.08.2020 22:42

Question

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

danilkatsurkan23 · 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). преобразованный
массив вывести на экран.(паскаль)