. В программе описан одномерный целочисленный массив A, в представленном фрагменте программы обрабатываются элементы массива с индексами от 1 до 21. s:=0; n:=21; for i:= 2 to n do begin s:=s+2*(A[i]-A[i-1]); end; В начале выполнения этого фрагмента в элементе массива с индексом i находилось число i (i = 1, …, 21), т. е. A[1] = 1, A[2] = 2 и т. д. Чему будет равно значение переменной s после выполнения данной программы? 1) 20 2) 21 3) 40 4) 42

Дополнил код до программы:

var
s: real;
i, n: integer;
A: array [1..21] of real;
begin
s:=0;
n:=21;
for i:= 1 to n do
A[i]:=i;
for i:= 2 to n do
begin
s:=s+2*(A[i]-A[i-1]);
end;
writeln(s);
end.

Результат: 40