var n,r:integer;
begin
readln(n);
r:=1;
for i:=1 to n do
r:=r*2;
writeln(r);
end.
program qq;
var t, c: real;
writeln('Введите кол-во минут');
readln(t);
c:= t*2;
writeln(c, 'бактерий будет через', n, 'минут');
var n,r:integer;
begin
readln(n);
r:=1;
for i:=1 to n do
r:=r*2;
writeln(r);
end.
program qq;
var t, c: real;
begin
writeln('Введите кол-во минут');
readln(t);
c:= t*2;
writeln(c, 'бактерий будет через', n, 'минут');
end.