В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значенияэлементов равны 1, 2, 4, 3, 5, 6, 8, 7, 3, 4, т.е. A[0]=1, A[1]=2 и т.д. Определите значение переменной sпосле выполнения следующего фрагмента программы:s := 0;for i:=1 to 9 doif A[i-1] < A[i] then beginA[i] := A[i-1] + 1;s := s + A[i]end

31

s := 0;

for i:=1 to 9 do

  if A[i-1] < A[i] then begin

        A[i] := A[i-1] + 1;

        s := s + A[i]

   end

В цикле программы выполняются такие действия: если элемент массива с индексом i меньше предыдущего элемента, то элементу массива с индексом i присваивается значение предыдущего элемента, увеличенное на единицу. А затем это новое значение суммируется со значением переменной s.

Если элемент массива с индексом i больше или равен предыдущему элементу, то выполнение переходит к следующему шагу цикла.

При разборе программы стоит составить таблицу трассировки.

1. Благодарю