Ответ:
Решение:
Программа на языке Паскаль:
program Example;
var
x: Integer;
y: Integer;
begin
y := 0;
for x := 1 to 9 do
begin
y := y * 2 + 3;
end;
Writeln('Результат y: ', y);
end.Блок-схема:
Ответ: Программа на Паскале и блок-схема представлены выше.
