Вопрос по информатике:

В программе используется одномерный целочисленный массив A с индексами от 0 до 10. Значения элементов равны 4, 3, 16, 24, 35, 18, 4, 72, 10, 99, 44 соответственно, т. е. A[0] = 4, A[1] = 3 и т. д.

Определите значение переменной c после выполнения следующего фрагмента программы, записанного ниже на пяти языках программирования.

Паскаль
c := 0;
for i := 1 to 9 do begin
if A[i] mod 10 = A[0] then
begin
c := c + 1;
t := A[i+1];
A[i+1] := A[i];
A[i] := t;
end;
end;