Question

В программе обрабатывается одномерный массив с индексами от 0 до 9. Значения элементов равны 1; 5; 9; 6; 5; 7; 8; 2; 6; 7; соответственно а[0]=1 a[1]=5 и т.д. Определить значение переменной к после выполнения фрагмента программы k:=0; for i:=0 to 8 do if ( а[i]+a [9-i]) mod 10 <6 then begin k:=k+1; t:=а[9-i]; а[9-i]:=а[9-i-1] ; а[9-i-1] :=t end;​