З клавіатури вводиться натуральне число k.
Обчислити 2 в степіні k;

program ex1;
var
k:integer;
begin
write('k='); readln(k);
writeln('2^',k,'=',exp(k*ln(2)));
end.