Составить программу на паскале сортировки массива по возрастанию

Сортировка методом пузырька: const n=10; var a: array[1..n] of integer; i,j,b: integer; begin   for i: =1 to n do read(a[i]);   for i: =1 to n-1 do     for j: =i+1 to n do       if a[j]< a[i] then         begin         b: =a[i];         a[i]: =a[j];         a[j]: =b;         end;   for i: =1 to n do write(a[i],' '); end.

ну тут сложно что-либо разжевать, ибо это основа основ.

если в более доступной форме, то начнем с простого:

1. бит - минимальная единица размерности, т.е меньше нет.

2. последующие размерности можно перевести как в биты, так и в другие размерности.

а) 1 байт = 2^3, т.е 1 байт равен 8 битам. в данной букве мы получаем 2^13, потому что в конце цепочки имеем кбайты (килобайты), а 1 кбайт = 2^10 байт. в итоге получается, что 1 кбайт = 2^13 бит. мы просто сложили 2^3 и 2^10.

б) все тоже самое, только в данном случае у нас мбайты (мегабайты), т.е 2^10 кбайт. сложив все степени мы видим, что 1 мбайт = 2^23 бит (2^10 * 2^10 * 2^3)

в) делается так же по аналогии с предыдущими.

1. традиционный "школьный" вариант var   i,j: integer; begin   for i: =1 to 5 do begin       for j: =1 to 8 do write(j,',');       writeln(9);       for j: =9 downto 2 do write(j,',');       writeln(1)       end end. результат 1,2,3,4,5,6,7,8,9 9,8,7,6,5,4,3,2,1 1,2,3,4,5,6,7,8,9 9,8,7,6,5,4,3,2,1 1,2,3,4,5,6,7,8,9 9,8,7,6,5,4,3,2,1 1,2,3,4,5,6,7,8,9 9,8,7,6,5,4,3,2,1 1,2,3,4,5,6,7,8,9 9,8,7,6,5,4,3,2,1 2. современный вариант // pascalabc.net 3.3, сборка 1627 от 27.01.2018 // внимание! если программа не работает, обновите версию! begin   loop 5 do begin       seqgen(9,i-> i,1).println(',');       seqgen(9,i-> 9-i).println(',')       end end.