Какое число ввел пользователь, если результатом исполнения программы
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.
является число 100?