var n, p, sol, i:longint;
	f, g:text;

begin
	assign(f, 'lgput.in');  reset(f);
    assign(g, 'lgput.out'); rewrite(g);

    read(f, n, p);

    sol := 1;
    for i := 1 to p do
    	sol := (sol * n) mod 1999999973;

    write(g, sol);

    close(f);
    close(g);
end.