Суханова1532
?>

Дана последовательность чисел a1, a2, …, an. требуется переставит числа в поряд-ке возрастания. для этого сравниваются два соседних числа ai и ai+1. если ai> ai+1 то делается пере-становка. так продолжается до тех пор, пока все элементы не станут расположены в порядке воз-растания. составить алгоритм сортировки, подсчитывая при этом количество перестановок. сделать в паскаль, прошу =*(

Информатика

Ответы

Косарев
Constmax = 10000; var  i, j : integer; x,raz  : longint; a : array[0..max]  of longint;     begin//  //допустим уже массив заполнен//          for i : = max downto 2 do         for j : = 2 to i do           if a[j] < a[j - 1] then             begin                 x : = a[j];                 a[j] : = a[j - 1];                 a[j - 1] : = x; inc(raz);             end;   writeln('количество перестановок =  ', raz);   end.не проверял, но должно вроде бы работать: )
olelukoya4
Var a,b: longint; function sum (n: integer): integer;   var s: integer;   begin       s: =0;       while (n< > 0) do         begin           s: =s+n mod 10;           n: =n div 10;         end;       sum: =s;     end;   begin     write ('a = ');     readln (a);     write ('b = ');     readln (b);     if sum(a) > sum(b) then         writeln ('сумма цифр 1ого числа больше на ',sum(a)-sum(b))     else if sum(b) > sum (a) then          writeln ('cумма цифр 2ого числа больше на ',sum(b)-sum(a))     else writeln ('сумма цифр 1ого числа равна сумме цифр 2ого числа');     readln;   end.
svetegal
Всоздании всемирной сети выделились два человека – роберт кайо и тим бернерс-ли в 1989 году мысли и разработки этих двух людей, в какой-то мере, были соединены – и именно так произошло создание всемирной сети. если спрашивают, кого считают изобретателем www и когда это произошло, то принято отвечать «тим бернерс-ли, 1989 год». тем не менее, вполне очевидно, что такой ответ не совсем корректен. во-первых, часть заслуг в данном изобретении принадлежит и роберту кайю, хотя непосредственным автором протокола http считается бернерс-ли. во-вторых, процесс создания занял долгие годы, относительно современная версия появилась лишь в девяностых, а в 89 году предложили именно базовая гипертекстовая система.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дана последовательность чисел a1, a2, …, an. требуется переставит числа в поряд-ке возрастания. для этого сравниваются два соседних числа ai и ai+1. если ai> ai+1 то делается пере-становка. так продолжается до тех пор, пока все элементы не станут расположены в порядке воз-растания. составить алгоритм сортировки, подсчитывая при этом количество перестановок. сделать в паскаль, прошу =*(
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

sergeevich
asl09777
Галина-Юлия1292
Dlyamila
Анатолий
coffeenik20233
mvolkov8
varvv15
ajuli2
NataliaBerezovskaya33
natalyaionova
alexkortyukov
Margarita
Dmitrievich-Telishev
Денис1619