В программе используется одномерный целочисленный массив A с индексами от 0

В программке употребляется одномерный целочисленный массив A с индексами от 0 до 9. Значения частей одинаковы 6; 4; 2; 5; 1; 7; 1; 8; 4; 8 соответственно, т.е. A[0] = 6; A[1] = 4 и т.д.

c := 0;
for i := 4 to 9 do
if A[i - 1] lt; A[i] then
begin
c := c + 1;
t := A[i];
A[i] := A[i - 1];
A[i - 1] := t
end;
Обусловьте значение переменной c после исполненья последующего куска программки, записанного ниже на различных языках программирования.