uses crt;
var a,n:qword;
procedure pow;
var dv,lt,r:qword;
    i:longint;
begin
    dv:=a mod 10;
    lt:=1;
    if n=0 then write(1)
    else if(dv=0)or(dv=1)or(dv=5)or(dv=6)then write(dv)
    else if(dv=3)or(dv=7)or(dv=9)then
        begin
            r:=n mod 4;
            for i:=1 to r do lt:=lt*(a mod 10);
            write(lt mod 10);
        end
    else if(dv=2)or(dv=4)or(dv=8)then
        begin
            r:=n mod 4;
            for i:=1 to r do lt:=lt*(a mod 10);
            write(6*lt mod 10);
        end;
end;
begin
clrscr;
    read(a,n);
    pow;
readln;readln;
end.

uses crt;
var a,n,k,lt,i:longint;
begin
clrscr;
    write('Nhap a,n: ');readln(a,n);
    k:=a mod 10;
    lt:=1;
    while i<n do 
       begin 
          inc(i);
          lt:=(lt*k)mod 10;
       end;
    writeln(lt mod 10);
readln;
end.