В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 7, 5, 13, 7, 5, 4, 11, 8, 10, 3, т.е. A[0]=7, A[1]=5 и т.д. Определите значение переменной s после выполнения следующего фрагмента программы:
n:= 10;
s:= 0;
for i:=1 to n-1 do
if A[i] > A[i-1] then
begin
A[i]:= A[i] - A[i-1];
s:= s + A[i]
end;