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

kirillmajer2007 kirillmajer2007    2   17.03.2019 12:51    33

Ответы
SvinkaPeppa777 SvinkaPeppa777  25.05.2020 20:01

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика