var

i,n,x:integer;

s:longint;

begin

writeln('nhapn');

readln(n);

write('nhapx');

readln(x);

s:=1;

for i:=1 to n do

s:=s*x;

write('tongla:',s);

readln;

end.