Написать программу в паскале: Вычислить сумму 2^2+2^3+2^4+...+2^10.Операцию возведения в квадрат не использовать.

Предыдущий
вопрос Следующий
вопрос

program PowerSum;
var
i, sum, power: Integer;
begin
sum := 0;
power := 2;

for i := 2 to 10 do
begin
power := power * 2;
sum := sum + power;
end;

writeln('Сумма всех степеней числа 2 от 2 до 10: ', sum);
end.