Question

Составьте программу в среде Pascal. Найти сумму 2^2 + 2^3 + 2^4 + ... + 2^10

Answer 1

program summa;

var

 res, a, i, j: integer;

begin

 a := 2;

 for i := 2 to 10 do

 begin

   for j := 2 to i do

   begin

     a := 2 * a

   end;

   res := a + res;

   a := 2;

 end;

 writeln(res);

end.

Answer 2

Вот пример программы на Pascal, которая находит сумму 2^2 + 2^3 + 2^4 + ... + 2^10:

cssCopy code
program SumOfPowers;

var
  i, powerOfTwo, sum: integer;

begin
  sum := 0;
  for i := 2 to 10 do
  begin
    powerOfTwo := round(exp(ln(2) * i));
    sum := sum + powerOfTwo;
  end;
  writeln('The sum is: ', sum);
end.

Как работает программа:

1. Объявляем переменные i, powerOfTwo, sum, которые будут использоваться в программе.
2. Инициализируем переменную sum нулем.
3. Запускаем цикл for, который проходит от 2 до 10 включительно.
4. На каждой итерации цикла вычисляем степень двойки, используя формулу powerOfTwo := round(exp(ln(2) * i)).
5. Добавляем полученное значение powerOfTwo к переменной sum.
6. По окончании цикла выводим на экран значение переменной sum, которое является суммой всех вычисленных степеней двойки.