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

VarA:array[1..1000] od longint;n,m,k,i,min,l:longint;Beginmin:=maxlongint;Readln(n);For i:=1 to n dobeginReadln(a[i]);If a[i]

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку