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