Сортировка-метод вставок

[diliana]

puporev
Stilet
спасибо

[Stilet]

а я код еще лучше сделала!

Работает? - Млацца!

с подсчетами пересылок и сравнений меня совсем запутали....

Мы?! - По сопатке нам, по сопатке...

[diliana]

Работает? - Млацца!

работает! но только непонятно, мне с подсчетом, как проверить это что правильно идет подсчет?

[Stilet]

как проверить это что правильно идет подсчет?

Пошагам пройдись по программе )

[Anatole]

как проверить это что правильно идет подсчет?

В первую очередь путём логических рассуждений:
При сортировке сравнения происходят в вот этой строчке:

while (j>=1) and (massiv[j]>temp) do

и в зависимости от результата сравнения выполняется цикл, или пропускается. Если цикл выполняется, то мы увеличиваем число сравнений, а есле не выполняется - то нет. Но сравнение то было! Следовательно необходимо увеличивать счетчик сравнений и после цикла.