Впрограмме описан одномерный целочисленный массив с индексами от 0 до 10. ниже представлен фрагмент программы, обрабатывающей данный массив: n: = 10; s: = 0; for i: =1 to n do begin if a[i]-a[i-1] < i then s: = s + i; end; в начале выполнения этого фрагмента в массиве находились числа фибоначчи: 1,1,2,3,5,8,13,21,34,55,89, т.е. a[0]=1, a[1]=1, a[2]=2 и т.д. чему будет равно значение переменной s после выполнения данной программы?

A[i]-A[i-1] это сдвиг чисел Фибоначчи на 1 вперед
т.е. 0,1,1,2,3,5,8,13,21,34,55,89 
A[i]-A[i-1]       i
      0             1     - подходит
      1             2   - подходит
      1             3   - подходит
      2             4   - подходит
      3             5   - подходит
      5             6   - подходит
      8             7   -не подходит
     13            8
     21            9
     34           10
     55           11
     89           12
s=1+2+3+4+5+6=21.