Задание

В программе используется одномерный целочисленный массив А с индексами от 1 до 10. Значения элементов равны индексам этих элементов, то есть a[1] = 1, a[2] = 2 и т.д.Определите значение переменной c после выполнения следующего фрагмента программы:

Pascal:

c := 0;

for i:=1 to 9 do

begin

a[i] := a[i+1];

c := c + a[i];

end;