Задан одномерный массив а(n) (n =90). поменять местами - вопрос №9010165001 от zoziev2014 09.05.2020 22:09

Question

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

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