1) вводится число n, высислить 2^n
2)вводится число n, вычислить 2^1+2^2+2^n

Вопрос школьника по предмету Информатика

1) вводится число n, высислить 2^n
2)вводится число n, вычислить 2^1+2^2+2^n

Ответ учителя по предмету Информатика

1.1.

var n,i,st:integer;

begin

write(‘n = ‘);

readln(n);

st:=1;

for i:=1 to n do st:=2*st;

writeln(‘2^’,n,’ = ‘,st);

end.

1.2.

begin

  var n:=ReadInteger(‘n =’);

  writeln(power(2,n));

end.

Пример:

n = 7

128

2.

var n,i,st,s:integer;

begin

write(‘n = ‘);

readln(n);

st:=1; s:=0;

for i:=1 to n do 

 begin

 st:=2*st;

 s:=s+st;

 end;

writeln(‘s = ‘,s);

end.

Пример:

n = 7

s = 254