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) % 1999999973;
        
    write(g, sol);
    
    close(f);
    close(g);
end.