иже представлен фрагмент программы, обрабатывающей одномерный целочисленный массив с индексами от 0 до 10. Известно, что в начале выполнения этого фрагмента в массиве находилась возрастающая последовательность чисел, то есть A[0] < A[1] < … < A[10]. Какое наибольшее значение может иметь переменная s после выполнения данной программы?

s := 15;

n := 10;

for i:=0 to n-1 do begin

s:=s+A[i]-A[i+1]+3

Если возрастающая, то следующий элемент больше хотя бы на 1. Если брать больше, то вычитаться будет больше, а итоговое значение - меньше. Итого за 10 итераций s доберёт (-1+3) * 10 = 20 единиц. Прибавляем к 15, получаем 35.