Есть ответ 👍

Работать на cls вообще ничего не знаю, сделайте кто-нибудь​

280
380
Посмотреть ответы 1

Ответы на вопрос:

aydin6
4,4(93 оценок)

Как ч понял сортировка по неубыванию это сортировка по возрастанию. то есть легкие элементы всплывают наверх, а тяжелые перемещаются вниз: //pascal const m = 1000 var       arr: array[1..m] of integer;       n,i, j, k: integer; begin       readln(n);       write ('исходный массив: ');       for i : = 1 to n do begin               readln(arr[i]);       end; //сортировка методом пузырька          for i : = 1 to n-1 do               for j : = 1 to n-i do                       if arr[j] > arr[j+1] then begin                               k : = arr[j];                               arr[j] : = arr[j+1];                               arr[j+1] : = k                       end;         write ('отсортированный массив: ');       for i : = 1 to n do               write (arr[i]: 4); end. алгоритм сортировки на классическом языке программирования с # define swap(a,b) {a=a^b; b=a^b; a=a^b; }void bubblesort(int a[], int n)  {       int i, j;       for(i = n-1 ; i > 0 ;           { for(j = 0 ; j < i ; j++)                {                     if( a[j] > a[j+1] ) swap(a[j],a[j+1]);                 }             }     }

Популярно: Информатика