Найти малый элемент массива,отсортировать по возрастанию и поставить малый

Отыскать малый элемент массива,отсортировать по возрастанию и поставить минимальный элемент на последнее место (конец массива)

Задать свой вопрос
1 ответ
Var A:array[1..1000] od longint; n,m,k,i,min,l:longint; Begin min:=maxlongint; Readln(n); For i:=1 to n do begin Readln(a[i]); If a[i]
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт