Демонстрация сортировки. после каждой строки нажимайте "enter"

program z1;

uses crt;

var i, m,j: integer;

a: array[1..10] of integer;

begin

clrscr;

randomize;

for i: = 1 to 10 do

begin

textcolor (4);

a[i]: =random(9)+1;

write (' ', a[i]);

delay(100);

end;

writeln(' ');

readln;

for j: =1 to 10 do

begin

for i: = 1 to 9 do

begin

if a[i]> a[i+1] then

begin

m: =a[i];

a[i]: = a[i+1];

a[i+1]: =m;

end;

end;

for i: = 1 to 10 do

begin

textcolor (4);

write (' ', a[i]);

delay(100);

end;

writeln(' ');

readln;

end;

writeln(' ');

for i: = 1 to 10 do

begin

textcolor (4);

write (' ', a[i]);

delay(100);

end;

readkey;

end.​

я поеду в москву и если встречу там друзей, то интересно проведем время.решение: м – я поеду в москвув – я встречу там друзей м×( в ® и )и – мы интересно проведем там время

если я поеду в москву и встречу там друзей, то интересно проведем время. решение: м×в ® и

не верно, что если погода пасмурная, то дождь идет тогда и только тогда, когда нет ветра.решение: д – идет дождьп – пасмурная погода  в – дует ветер 

делается по такому же принципу 

логика, морзе, вектор, шина, дек, рунет, железо, терно, юзер, каретка, адаптер, браузер, цифра, образ, плата, эталон, сектор(стокер), зерно, утилита, файл, гамма, щелчок, чистка, иконка, ядро, ершов, хаб, набор 

readln (a, b);     -  вводим значения а в

c: =(a+b) * (b-a);   - выполняем уравнение

    writeln (c) -  выводим результат

в итоге получается

с=(7+8)*(8-7)

c=15

соттветственно будет получен результат 15 на экране.

гляди

26 разделим по 3 кучки

получим 9 9 8

если взвесим 9 и 9 и какойто будет легче, то тот разбиваем еще на 3 кучки, т.е. уже

3 3 3,взвешиваем если оба одинаковы,то берем третий,если какой то из них меньше то берем его и расскладываем еще на 3 кучки,получаем 1 1 1,отсюда если два камня равны то они искусствены и берем третий,если нет,то берем меньший по весу.

теперь если 9 и 9 одинаковы

разложем 8 на 3 кучи

получаем 3 3 2

3 3 уже рассматривали,возьмем 2 разложим на 1 1 и один из них будет меньше по весу! в итоге 3 взвешивания!