Какое число ввёл пользователь, если результатом исполнения программы является число 100? var a: array [1..8] of integer; i, sum: integer; begin readln(a[1]) ; sum: =0; for i : = 2 to 8 do a[i]: = a[i - 1] +3; for i : = 8 downto 1 do sum: = sum + a[i]; writeln(sum); end.

программа присваивает введённое пользователем значение на первое место массива, который состоит из 8ми элементов,

каждый ледующий элемент массива программа увеличивает на 3, а потом считает  сумму всех элементов.

по сути в конечной сумме введённое число складывается 8 раз, и 7 раз прибавляется 3ка сложеная 1-7 раз.

х*8+3*(1+2+3+4+5+6+7)=100

8х=100-3*28

х=16/8=2