Найти минимальный элемент массива,отсортировать по возрастанию и поставить минимальный элемент на последнее место (конец массива) program z1; uses crt; var mas: array [1..50] of integer,i,j,integer; begin randomize; for i: = 1 to 50 do mas[i]: =random(200); for i: =1 to 49 do for i: =49
downto i do if a[j+1 m: =a[j]; a[j+1]: =a[j+1]; =m; end дописать программу,чтобы первый элемент стал последним.