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

1.1.var n,i,st:integer;beginwrite('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 = 71282.var n,i,st,s:integer;beginwrite('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 = 7s = 254