Question

Ввести целое число n и вывести 2 ^n , используя битовые операции.

Answer 1

Var n:integer;
Begin
Write('n = ');ReadLn(n);
WriteLn(2,'^',n,' = ',1 shl n);
End.