Question

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

Answer 1

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

Answer 2

А что бы вместо цикла просто не написать shl n ?

Answer 3

Уже=))

Answer 4

О, телепатия!