Составьте программу вычисления 1+2+4+8 + ... + 2 (в 10 степени)

Question

Эркюль

Информатика

19 ноября, 15:14

Составьте программу вычисления 1+2+4+8 + ... + 2 (в 10 степени)

+4

Ответы (1)

Знаешь ответ на этот вопрос?

Виктория Кузнецова · Answer 1

var a, b, sum:longint;

begin

b:=1;

for a:=0 to 10 do begin

sum:=sum+b;

b:=b*2;

end;

writeln (sum);

end.

(Если на Паскале, то вот это должно прокатить))