Question

Помогите срочно нужно!!!!
В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 5; 1; 6; 7; 8; 8; 7; 7; 6; 9 соответственно, т.е. A[0] = 5; A[1] = 1 и т.д. Определите значение переменной c после выполнения следующего фрагмента программы:
c := 0;
for i := 1 to 9 do
if A[i-1] >= A[i] then begin
t:= A[i];
A[i]:= A[i - 1];
A[i-1]:= t
end
else
c:= c + 1;

Answer 1

В переменной с вычисляется количество пар элементов, в которых A[i-1] < A[i] (т.е. в паре соседних элементов предыдущий элемент меньше следующего). Это следующие пары: 1,6 ; 6,7 ; 7,8 ; 6,9. Таких пар всего 4, значит значение переменной с будет = 4.