Ниже представлен фрагмент программы, обрабатывающей одномерный целочисленный массив с индексами от 0 до 10. известно, что в начале выполнения этого фрагмента в массиве находилась возрастающая последовательность чисел, то есть a[0]
Const A:array[0..10] of integer =(0,1,2,3,4,5,6,7,8,9,10);var i,s,n:integer;begins:=27;n:=10;write(A:4);writeln;for i:=0 to n-1 do begin s:= s + A[i] - A[i+1] + 2;writeln(i:3,A[i]:4);end;write('s=',s);end.