В программе описан одномерный целочисленный массив с индексами от 0 до 10.Ниже...

Question

В программе описан одномерный целочисленный массив с индексами от 0 до 10.Ниже представлен фрагмент программы ,обрабатывающей данный массив:
S:=0;
n:=10;
for i:=0 to n do
begin
If A{n-I}-A{I}>A{I} then
S:=s+A{I};
End;
В начале выполнения этого фрагмента в массиве находились числа 0, 10, 20 , 30, 40 , 50 , 60, 70, 80 , 90 , 100 , т.е. A[0]=0, A[1]=10 и т.д.Чему будет равно значение переменной s после выполнения данной программы?

Answer 1

Const A:array[0..10] of integer =(0,10,20,30,40,50,60,70,80,90,100);var i,s,n:integer;begins:=0;n:=10;write(A:4);for i:=0 to n do begin if A[n-i]-A[i] > A[i] then begin s:= s +A[i];writeln(i:3,A[i]:4);end;end;write('s=',s);end.