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

Результатом исполнения данной программы не может быть число 100, так как эта программа содержит ошибку.Массив здесь описанvar a: array [1..8] of integer;При выполнении циклаfor i:=1 to 8 do a [i] := a [i-1] + 3;на первом шаге должна быть выполнена команда a[1]:=a[0]+3Элемента a[0] в массиве нет. Даже если бы он был, то введенное значение a[1] было бы заменено новым значением a[0]+3